geom_smooth en ggplot hace que parte del fondo de la trama cambie de color

Question

¿Cómo puedo evitar el sombreado gris del área de trazado que se produce al trazar los siguientes datos?

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 

Así bien hasta este punto, pero luego añadir una ecuación de línea usando geom_smooth hace parte del fondo se convierta en gris.

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

¿Alguna sugerencia sobre cómo evitar esto? Gracias.

Answer 1

Añadir fill=NA a su llamada geom_smooth:

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