ggplot2摆脱置信区间

Question

我在R中使用"ggplot2“包。

ggplot2::mpg


A tibble: 234 x 11
   manufacturer model      displ  year   cyl trans      drv     cty   hwy fl    class  
   <chr>        <chr>      <dbl> <int> <int> <chr>      <chr> <int> <int> <chr> <chr>  
 1 audi         a4           1.8  1999     4 auto(l5)   f        18    29 p     compact
 2 audi         a4           1.8  1999     4 manual(m5) f        21    29 p     compact
 3 audi         a4           2    2008     4 manual(m6) f        20    31 p     compact
 4 audi         a4           2    2008     4 auto(av)   f        21    30 p     compact
 5 audi         a4           2.8  1999     6 auto(l5)   f        16    26 p     compact
 6 audi         a4           2.8  1999     6 manual(m5) f        18    26 p     compact
 7 audi         a4           3.1  2008     6 auto(av)   f        18    27 p     compact
 8 audi         a4 quattro   1.8  1999     4 manual(m5) 4        18    26 p     compact
 9 audi         a4 quattro   1.8  1999     4 auto(l5)   4        16    25 p     compact
10 audi         a4 quattro   2    2008     4 manual(m6) 4        20    28 p     compact
# … with 224 more rows

我正在使用R中的mpg数据。我在绘制散点图并从我添加到散点图的回归线中删除置信区间时遇到了问题。

When I use the see =FALSE, I get Warning message:
Ignoring unknown aesthetics: se

这是我的代码，附加的图片是我如何尝试可视化数据的一个例子。我有点，但不能用"se“参数计算出回归线。我已经使用了se =FALSE，method=lm等，谢谢

ggplot(data=mpg)+
  geom_point(mapping = aes(x=displ, y=hwy))+
  geom_smooth(mapping=aes(x=displ, y=hwy, color=drv, se=FALSE))

https://i.stack.imgur.com/pMqqJ.jpg

Answer 1

如果您想要抑制置信区间可视化，那么要添加的代码实际上是se = FALSE。然而，这不是一种“美学”，因此不应该在美学的定义之内。另一种解决方案是@Aite97提供的解决方案。

下面的代码可以解决这个问题。

ggplot(mpg) +
  geom_point(aes(x = displ, y = hwy))+
  geom_smooth(aes(x = displ, y = hwy, color = drv), se = FALSE)

这将生成以下图形：

​

​

Answer 2

一个解决方案是将se = FALSE替换为level = 0。level是置信度，将其设置为0可以解决此问题：

ggplot(data=mpg)+
  geom_point(mapping = aes(x=displ, y=hwy))+
  geom_smooth(mapping=aes(x=displ, y=hwy, color=drv), level = 0)