使 k-means 的轮廓图清晰易读

Make silhouette plot legible for k-means

我正在尝试为 k 均值聚类绘制剪影图,但条形图几乎不可见。我怎样才能使这张图表清晰易读?

示例代码:

require(cluster)

X <- EuStockMarkets
kmm <- kmeans(X, 8)

D <- daisy(X)
plot(silhouette(kmm$cluster, D), col=1:8)

示例输出:

对 R 很陌生,所以我可能走错了路。你能指定列的颜色吗?类似于:

require(cluster)

X <- EuStockMarkets
kmm <- kmeans(X, 8)

D <- daisy(X)
plot(silhouette(kmm$cluster, D), col = c("blue","red","purple","green","black","pink","peach","orange")

我刚刚了解到 colors() 显示了 R 中的颜色选项。

上面的想法不是一个完整的解决方案,因为我不确定如何 select 列 1 到 8 和 select 颜色。另外,我确信 R 有一种方法可以自动显示不同颜色的簇。

要解决此问题,请将边框设置为 NA:

plot(silhouette(kmm$cluster, D), col=1:8, border=NA)