RStudio の "plot.new() : figure margins too large" 問題を解決する。

　　RStudioでplot()関数を使用する際、 "plot.new() : figure margins too large"という問題がよく発生します。これを図(1)に示します。

<センター <センター
　　この問題の原因は、RStudio の [Plots] ウィンドウが小さすぎるためで、ウィンドウを大きくするか、RStudio をフルスクリーンに設定することです。修正する手順は以下の通りです。
　　1. マウスで[Plots]タブを選択し、図(2)のようにウィンドウを少し大きくドラッグします。
<センター <センター 図(2) [プロット]ウィンドウをドラッグして大きくする
　　2. コードのテスト
　　//データソース drink.txt　　

index heat caffeine Na price
1 207.2 3.3 15.5 2.8
2 36.8 5.9 12.9 3.3
3 72.2 7.3 8.2 2.4
4 36.7 0.4 10.5 4.0
5 121.7 4.1 9.2 3.5
6 89.1 4.0 10.2 3.3
7 146.7 4.3 9.7 1.8
8 57.6 2.2 13.6 2.1
9 95.9 0.0 8.5 1.3
10 199.0 0.0 10.6 3.5
11 49.8 8.0 6.3 3.7
12 16.6 4.7 6.3 1.5
13 38.5 3.7 7.7 2.0
14 0.0 4.2 13.1 2.2
15 118.8 4.7 7.2 4.1
16 107.0 0.0 8.3 4.2

　　//ceshi.　　

drink <- read.table("G:/myProject/RDoc/Unit3/rChap1/drink.txt",header = T)
drink <- drink[,-1]
d=dist(drink)
hc1=hclust(d,method="ward.D2") #divergence sum-of-squares method
hc2=hclust(d,method="single") #minimum distance method
hc3=hclust(d,method="complete") #Longest distance method
hc4=hclust(d,method="median") #median distance method
opar=par(mfrow=c(2,2)) # split plot area
plot(hc1,hang=-1);plot(hc2,hang=-1);plot(hc3,hang=-1);plot(hc4,hang=-1)
par(opar) #release plot region split

　　その効果は次の通りです。

<センター <センター 図(3) [プロット]ウィンドウを拡大した後の描画の効果