ggplotを使って同じプロットで平滑化スプラインを2つプロットするにはどうすればよいですか？例えば、私はこのようなプロットのカップルを

Question

を持っている：

ggplot(mpg, aes(displ, hwy)) + 
geom_point() + 
geom_smooth(method = "lm", formula = y ~ splines::bs(x, 3), se = T) 

は、それが同じプロットにこれらの種類の2をプロットすることは可能ですか？

Answer 1

あなただけの別のfonctionを追加したい場合は、別のレイヤーを追加：あなたは別のデータフレームからのデータを追加したい場合は+ geom_smooth()

ggplot(mpg, aes(displ, hwy)) + geom_point() + 
geom_smooth(method = "lm", formula = y ~ splines::bs(x, 3), se = T) + 
geom_smooth(method = "lm", formula = y ~ splines::bs(x, 4), se = T) 

---

を、geom_smooth内df情報を追加：

ggplot(mpg, aes(displ, hwy)) + geom_point() + 
geom_smooth(method = "lm", formula = y ~ splines::bs(x, 3), se = T) + 
geom_smooth(data = mpg, aes(x = displ, y = cyl), method = "lm", formula = y ~ splines::bs(x, 4), se = T) 

---

最後に、色や伝説をカスタマイズ： color引数は `gridExtra :: grid.arrange`の凡例

ggplot(mpg, aes(displ, hwy)) + geom_point() + 
geom_smooth(aes(color = "B"),method = "lm", formula = y ~ splines::bs(x, 3), se = T) + 
geom_smooth(data = mpg, aes(x = displ, y = cyl, color = "A"), method = "lm", formula = y ~ splines::bs(x, 4), se = T) + 
scale_color_manual("Legend Title", values = c("A" = "red", "B" = "blue"))