绘制每个 k-means 集群的热图？

Question

我有一个由数值观察组成的大型数据集。对于这个数据集，我计算了定义 6 个集群的 k-means。如何绘制每个集群的热图？当我尝试以下操作时，出现错误：

clusters <- kmeans(dataset, 6) heatmap(clusters$cluster)

Answer 1

所以基本上，您可以做的是进一步子集化，并使用 for 循环。 clusters 的结果是一个列表，其中的中心或 k（簇）是您在 kmeans 函数中指定的观测值集。

clusters <- kmeans(dataset, k = 6)
for (i in c(1:k)) {
pheatmap(dataset[names(clusters$cluster[clusters$cluster == i]), ])
}

这里，如果 k = 6，您将获得 6 个热图，即数据集中的每个观测集群之一。