我想创建一个图表,显示每个组(由因素组织)内计算值的均值,以及各自的单独点。我已经成功地做到了这一点,但所有点都使用相同的符号。我希望在每个因子内的每个点具有不同的符号,并且最好按照相同的顺序使用相同的点来表示每个因子。
下面是我目前正在制作的图表的示例版本,但同一列中的所有点都使用相同的符号。
我考虑使用点的行号来定义符号形状,但我认为默认的ggplot2软件包中只有25种不同的形状可用,并且我的真实数据有超过25个点,此外,我更喜欢在每列中使用相同的点,以保持图表的一致性。
下面是我目前正在制作的图表的示例版本,但同一列中的所有点都使用相同的符号。
我考虑使用点的行号来定义符号形状,但我认为默认的ggplot2软件包中只有25种不同的形状可用,并且我的真实数据有超过25个点,此外,我更喜欢在每列中使用相同的点,以保持图表的一致性。
Mean_list <- data.frame(Cells = factor(c("Celltype1", "Celltype2", "Celltype3",
"Celltype4"),
levels =c("Celltype1", "Celltype2", "Celltype3", "Celltype4")),
Mean = c(mean(c(1, 2, 3)), mean(c(5, 8, 4)), mean(c(9, 8 ,3)),
mean(c(3, 6, 8, 5))))
values_list <- data.frame(Cells2 = rep(c("Celltype1", "Celltype2", "Celltype3",
"Celltype4"), times = c(length(c(1, 2, 3)),
length(c(5, 8, 4)), length(c(9, 8 ,3)),
length(c(3, 6, 8, 5)))),
values = c(1, 2, 3, 5, 8, 4, 9, 8, 3, 3, 6, 8, 5))
ggplot() + geom_col(data = Mean_list, aes(Cells, Mean, fill = Cells)) +
geom_point(data = values_list, aes(Cells2, values))