使用聚类分析的条形图（）格式化问题

Question

我已经创建了我的聚类分析的段概要图，但是我遇到了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.的新手。

Answer 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轴上标签的间距。您甚至可以使其高度超过其宽度，以使标签展开。 （我想目前你不能这样做，因为这是你屏幕的最大高度？）