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

How do I make a continuous smoothed median with ggplot function?

这是我的代码:

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

我得到的不是连续平滑的中位数,而是整个数据的中位数看起来支离破碎且不准确。我认为这是由于 "factor(cyl)" 函数造成的。

这是我的代码给出的 link:

如果在 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))