r - 具有平滑绘图的多个 mean_sdl

Question

我如何在相同的输出中绘制p7和p6完全绘制，其中 m7 和 m6 是通过融合不同的数据集获得的？提前致谢

p7 <- ggplot(m7,aes(x=time,y=value)) +stat_summary(fun.data = "mean_sdl", geom = "smooth")
p6 <- ggplot(m6,aes(x=time,y=value)) +stat_summary(fun.data = "mean_sdl", geom = "smooth")

Answer 1

你可以试试这个：

p7 <- ggplot(m7,aes(x=time,y=value)) +stat_summary(fun.data = "mean_sdl", geom = "smooth")
p6 <- p7 + stat_summary(aes(x=time,y=value), fun.data = "mean_sdl", geom = "smooth", data = m6)