ggplot中的geom_smooth会导致绘图背景的一部分改变颜色

Question

如何在绘制以下数据时避免绘图区域的灰色阴影？

df <-data.frame(x = c(0,0.2,0.5), y = c(0.6,0.7,0.9))

p <-ggplot(df, aes(x, y, ymin=0, ymax=1, xmin=0, xmax=1))

p <- p + geom_point(alpha=2/10, shape=21, 
                fill="blue", colour="black", size=5)

p

如此精细,直到这一点,然后使用geom_smooth添加线方程导致部分背景变为灰色.

p <- p + geom_smooth(method="lm", se=FALSE, formula=y~x, colour="black")
p

有关如何避免这种情况的任何建议？谢谢.

Answer 1

加入fill=NA你的geom_smooth电话:

p + geom_smooth(method="lm", se=FALSE, formula=y~x,colour="black",fill=NA)