2013-03-04 13 views
6

今日、clusterパッケージのsilhouetteプロットがRStudioに正しく表示されないことがわかりました。 Google検索は、他の誰かがこれで問題があったことを明らかにした:R:RStudio:シルエットプロットの仕組みは?

http://support.rstudio.org/help/discussions/problems/3094-plotsnot-showing-up-in-r-studio

がRに新しいということは、それは問題はこのスレッドで解決されたかどうか私には不明でした!だから私の質問は:RStudioで正しく表示するsilhouetteプロットを取得する方法はありますか?

ありがとうございました。

スクリプト例:あなたが参照するスレッドが、かなり明確なだったよう

library(cluster) 
data(xclara) 
km <- kmeans(xclara,3) 
dissE <- daisy(xclara) 
sk <- silhouette(km$cl, dissE) 
plot(sk) 

答えて

9

は思え:silhouetteパッケージには、バグWRT png出力を有していてもよく、そしてRStudioは、他のいくつかのグラフィックス形式で素晴らしいプレーしません。 Joshが書いたように、RStudioを使用するときは、「pdf()、quartz()、およびwindows()デバイス...」を指定する必要があります。

編集:ので、あなたが何をする必要があるか、ファイルに直接あなたのプロットを書き

pdf('my_nice_plot.pdf') 
plot(sk) 
dev.off() 

です。最初の行をpng('my_nice_plot.png')などに置き換えてみてください。同様に動作するはずです。しかし、RStudioのグ​​ラフィックスウィンドウでインターフェイスをアップグレードするまで、きれいなプロットを得ることはできません。

+0

感謝をしてみてください。最初の質問で述べたように、私が 'R 'に新しい(またはそれほど巧妙ではない)ので、スレッドが解決策で終わったかどうかは分からなかった。サンプルスクリプト(上記を参照)に追加できるコードがあれば、あなたはそれが何であるか教えてくれるように親切でしょうか?乾杯。 – user32259

+0

ご協力いただきありがとうございます。 – user32259

+0

光沢付で使用するには? – vipin8169

1

これは、実際のプロットの可視性のちょうど問題になることがあります。

library(cluster) 
data(xclara) 
km <- kmeans(xclara[1:100,],3) 
dissE <- daisy(xclara[1:100,]) 
sk <- silhouette(km$cl, dissE) 
plot(sk)