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

Question

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

示例代码:

require(cluster)

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

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

示例输出:

Answer 1

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

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