平滑繪圖的多重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)