将geom_smooth添加到boxplot

我正在尝试为geom_smooth()一些boxplot图添加趋势,但我没有正确获得图层.

我如何将这两者合并在一起？

geom_boxplot:

ggplot(test) + geom_boxplot(aes(x=factor(year), y = dm))

geom_smooth

ggplot(test, aes(year, dm)) + geom_smooth() 

geom_boxplot和geom_smooth

ggplot(test) + geom_boxplot(aes(x=factor(year), y = dm)) + geom_smooth(aes(x = year, y = dm))

我使用了mtcars公共数据,因为它没有被提问者使用.

data(mtcars)

像往常一样创建箱图,并分配给对象.我把随机变量作为boxplot的一个因子,另一个变量作为数字.

g <- ggplot(mtcars, aes(factor(carb), mpg)) + geom_boxplot()

添加geom_smooth.geom_smooth从geom_boxplot继承必要的信息.

g + geom_smooth(method = "lm", se=TRUE, aes(group=1))

注意到aes(group=1)在这种情况下geom_smooth所需的表达式.没有它,R返回错误:

geom_smooth:每个组只有一个唯一的x值.也许你想要aes(group = 1)？

固定线平滑的值是线性回归的系数,而截距对应于因子的最低水平(碳水化合物= 1)