在R中通过集群可视化变量

我有以下数据集：

set.seed(1680) # for reproducibility
df <- data.frame(particle=rnorm(300,rep(1:3,100),1), cluster = rep(1:3,100))

set.seed（1680）#用于再现性
df另一种选择是使用
geom_小提琴

df %>%
    mutate(cluster = as.factor(cluster)) %>%
    ggplot(aes(x = cluster, y = particle, fill = cluster)) +
    geom_violin() +
    coord_flip()

尝试
df%>%突变（簇=因子（簇））%%>%ggplot（aes（x=簇，y=粒子，颜色=簇））+geom_point（）
这看起来就像是一个
geom_抖动
由簇着色的绘图类型，不？@akrun好主意@卡米尔：是的，你是对的。。