R柱状点形状

我使用kMeans和clusplot函数来绘制数据，但是我想使用自定义点形状或根本不使用点形状。在clusplot中使用pch参数会生成一个错误的形式参数pch，该参数与多个实际参数匹配

例如，在以下绘图中，通过自定义向量更改所有点形状：

library(cluster)
d <- dist(scale(mtcars), method="euclidean")
k <- kmeans(d, 2)
clusplot(d, diss=T, k$cluster, labels=2, col.txt=c("blue", "red")[k$cluster])

---

您可以使用cmdscale获取点的位置，然后先打印点并通过cex=0和add=TRUE使用不可见点进行群集打印，或者先执行clusplot并使用点以您想要的任何样式添加点。第一点：

> plot(cmdscale(d),pch=19)
> clusplot(d, diss=TRUE, k$cluster, labels=2, col.txt=c("blue", "red")[k$cluster],cex=0,add=TRUE)

首先聚类，然后使用交替符号点，仅用于图示：

> clusplot(d, diss=TRUE, k$cluster, labels=2, col.txt=c("blue", "red")[k$cluster],cex=0)
> points(cmdscale(d),pch=1:2)

---

您可能还需要使用xlim=c-5,5将标签完全插入。

能否创建一个可复制的示例？是的，创建一个数据集，对它进行聚类，然后进行绘图，对我们来说太麻烦了。我们更愿意从你的问题中剪切和粘贴一些代码。或者根本没有点形状。你的意思是只绘制没有点的椭圆？还是希望所有点具有相同的形状？所有点具有相同的形状就足够了，但自定义形状会更好。如果使用cex=0，则会得到大小为零的不可见形状。。。然后，如果您可以获得每辆车的两个组件，那么您可以根据您的意愿添加带有点的点……如果您将plotchar设置为FALSE，则会将所有点绘制为同一个字符。