当我在 geom_jitter 中使用 aes(shape) 时，单个点不再与它们各自的组在重叠的 geom_col 图中对齐

如何解决当我在 geom_jitter 中使用 aes(shape) 时，单个点不再与它们各自的组在重叠的 geom_col 图中对齐

我试图将某种蛋白质的血清浓度在 6 天的时间段内的变化可视化。我能够很容易地获得我想要的条形图，但是，我试图发表的期刊需要包含在任何类型图表中的单个数据点。

我也可以通过添加 geom_point 图来做到这一点，但是，当我尝试根据数据点来自的细胞线（也是必需的）为每个点分配特定形状时，我的点最终会排序特定的订单。

这是我当前的图形代码：

ggplot(table6,aes(x = Location,y = Ave,fill = Treatment)) +
geom_col(position = "dodge",color = "black",size = 1) +
    facet_wrap(~ Time) +
        scale_fill_brewer(palette = "Oranges") +
geom_point(aes(y = Conc,x = Location),position = position_dodge(0.9)) +
geom_errorbar(aes(ymin = Ave,ymax = Ave+SD),width = .3,size = 1.0,position=position_dodge(.9)) +
labs(title = "Concentration of ANG in Media of Complement Treated iRPE",x = "",y = "ANG conc. (pg)") +
theme_classic() +
theme(axis.text = element_text(size=12),plot.title = element_text(hjust = 0.5,size = 18,face = "bold"),strip.text.x = element_text(size = 16,face = "bold"))

之前

现在，当我尝试为各个点分配形状时，会发生以下情况：

ggplot(table6,size = 1) +
facet_wrap(~ Time) +
scale_fill_brewer(palette = "Oranges") +
geom_point(aes(y = Conc,x = Location,shape = Line),position=position_dodge(.9)) +
labs(title = "Title",face = "bold"))

之后