0

クラスター分析のセグメント プロファイル プロットを作成しましたが、barchart()コマンドのフォーマットに問題があります。これが私が作成したチャートです。明らかな問題は、私の行が近すぎて読めないことです。明らかな問題は、線が近すぎることです

ここでは、このチャートを作成するために使用したコードを確認できます。このグラフを読みやすくするために何を追加すればよいか誰か教えてもらえますか? 以下は、使用した私のコードの例です。

使用したクラスタリングと PCA を再現するための R コード:

## if not installed, install: install.packages("flexclust")
library("flexclust")
load("vacpref.RData")
cl6 <- kcca(vacpref, k=vacpref6, control=list(iter=0),
            simple=FALSE, save.data=TRUE)
summary(cl6)

変数の階層的クラスタリング

varhier <- hclust(dist(t(vacpref)), "ward")
par(mar=c(0,0,0,15))
plot(as.dendrogram(varhier), xlab="", horiz=TRUE,yaxt="n")

主成分射影

vacpca <- prcomp(vacpref)

セグメント分離プロットを生成するための R コード

pairs(cl6, project=vacpca, which=1:3, asp=TRUE,points=FALSE, 
      hull.args=list(density=10))

セグメント ポジショニング プロットを生成するための R コード:

col <- flxColors(1:6)
col[c(1,3)] <- flxColors(1:4, "light")[c(1,3)]
par(mar=rep(0,4))
plot(cl6, project=vacpca, which=2:3,
     col=col,asp=TRUE,points=F,hull.args=list(density=10),axes=FALSE)
projAxes(vacpca, minradius=.5, which=2:3, lwd=2, col=”darkblue”)

セグメント プロファイル プロットを生成するための R コード:

barchart(cl6, shade=TRUE, which=rev(varhier$order),legend=TRUE)

最後のコマンドは、セグメント プロファイル プロットを作成するために使用したコマンドですが、以前のコマンドが何らかの形で影響を与えたかどうかはわかりませんでした。私はRが初めてです。

4

1 に答える 1

0

私がよく使うトリックの 1 つは、画像をエクスポートして幅/高さと解像度を変更することです。これを試して：

png("c:\\temp\\myCrazyPlot.png", res=250, height=8, width=12, unit="in")
  barchart(cl6, shade=TRUE, which=rev(varhier$order),legend=TRUE)
  # And whatever other plot commands for the same plot
dev.off()

次に、.png ファイルを確認します。高さと幅を調整することで、y 軸のラベルの間隔を調整できます。幅よりも高さを長くして、ラベルを広げることもできます。（画面の最大の高さなので、現在はそれができないと思いますか？）

于 2013-09-26T23:29:20.867 に答える