r - 如何使用 ggplot 函数制作连续平滑的中位数？

Question

这是我的代码:

ggplot(mtcars, aes(x = wt, y = mpg, colour = factor(cyl)))+
geom_point(stat = "identity")+
theme_bw()+
geom_smooth()

我得到的不是连续平滑的中位数，而是整个数据的中位数看起来支离 splinter 且不准确。我认为这是由于“factor(cyl)”函数所致。

这是我的代码给出的链接:

Answer 1

如果在 geom_smooth() 中添加 aes(group=1) 您将解决您的问题:

ggplot(mtcars, aes(x = wt, y = mpg, colour = factor(cyl)))+
 geom_point(stat = "identity")+
 theme_bw()+
 geom_smooth(aes(group=1))