R 图K-均值聚类

我想用两种不同的颜色绘制总共有两个聚类的K-Means聚类图，其示例如下所示

x
            Name Cluster
1           A2M       1
2          AAAS       1
3          AACS       1
4         AAGAB       1
5          AAK1       1
6          AAMP       1
7          AARS       1
8         AARS2       1
9        AARSD1       1
10        AASDH       1
11     AASDHPPT       1
12         AASS       1
13         AATF       1
14         ABAT       1
15        ABCA1       1
16      ABCA11P       1
17        ABCA3       1
18        ABCA5       1
19       ABCB10       1
20        ABCB6       1
21        ABCB7       1
22        ABCB8       1
23        ABCC1       1
24       ABCC10       1
25        ABCC4       1
26        ABCC5       1
27        ABCD3       1
28        ABCD4       1
29        ABCE1       1
30        ABCF1       1
31        ABCF2       1
32        ABCF3       1
33        ABCG1       1
34       ABHD10       1
35       ABHD11       1
36       ABHD12       1
37       ABHD13       1
38      ABHD14A       1
39      ABHD14B       1
40        ABHD2       1
20286    ZNF749       2
20287     ZNF76       2
20288   ZNF804A       2
20289   ZNF804B       2
20290    ZNF835       2
20291    ZNF852       2
20292   ZNF861P       2
20293    ZNF865       2
20294   ZNF876P       2
20295     ZNF99       2
20296     ZNRF4       2
20297       ZP1       2
20298       ZP2       2
20299     ZPBP2       2
20300    ZSCAN1       2
20301   ZSCAN10       2
20302 ZSCAN12P1       2
20303    ZSWIM2       2
20304    ZSWIM4       2
20305      tAKR       2

数据帧

x

有两个大小分别为15206和5099的集群。 我试过密码

library(ggplot2)
ggplot(x, aes(x$Name, x$Cluster, color = x$Cluster)) + geom_point()

获取错误信息：

使用方法（“深度”）时出错： 没有适用于“NULL”类对象的“depth”方法

---

请修改你的密码。不需要在对象中引用变量

xy <- data.frame(Name = LETTERS, Cluster = sample(1:3, size = 26, replace = TRUE))

library(ggplot2)

ggplot(xy, aes(x = Name, y = Cluster, color = as.factor(Cluster))) +
  geom_point()

---

请修改您的代码。不需要在对象中引用变量

xy <- data.frame(Name = LETTERS, Cluster = sample(1:3, size = 26, replace = TRUE))

library(ggplot2)

ggplot(xy, aes(x = Name, y = Cluster, color = as.factor(Cluster))) +
  geom_point()

---

谢谢你的回答。这是否适用于较大的群集，正如我提到的，我有两个大小分别为15206和5099的群集。@Hashim您可以根据需要绘制任何图形。这有意义吗？我不知道。不过，您可以做一些事情来优化它。像应用抖动（已经在上面的例子中完成），设置透明度，二次采样…谢谢你的回答。这是否适用于较大的群集，正如我提到的，我有两个大小分别为15206和5099的群集。@Hashim您可以根据需要绘制任何图形。这有意义吗？我不知道。不过，您可以做一些事情来优化它。像应用抖动（在上面的例子中已经做过），设置透明度，二次采样。。。