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

Question

我正在尝试为k-means聚类制作一个轮廓图，但这些条几乎是不可见的。如何使这个图表清晰可见？

示例代码：

yearCalendarView

示例输出：

Answer 1

要解决此问题，请将边框设置为NA：

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

Answer 2

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中的颜色选项。

上述想法并不是一个完整的解决方案，因为我不确定如何选择第1列到第8列并为它们选择颜色。另外，我确信R可以自动显示不同颜色的簇。