Al cambiar ylim (límites de eje), los datos de caída quedan fuera del rango. ¿Cómo se puede prevenir esto?

Question

df <- data.frame(age=c(10,10,20,20,25,25,25),veg=c(0,1,0,1,1,0,1)) 
g=ggplot(data=df,aes(x=age,y=veg)) 
g=g+stat_summary(fun.y=mean,geom="point") 

Los puntos reflejan la media de verduras a cada edad, que es lo que esperaba y deseo conservar después de cambiar los límites del eje con el siguiente comando.

g=g+ylim(0.2,1) 

Cambio de límites de eje con el comando anterior desafortunadamente hace que veg == 0 subconjunto para ser bajado de los datos, produciendo

"mensaje de advertencia: omitido 4 filas que contienen valores que faltan (stat_summary)"

Esto es malo porque ahora la trama de datos (stat_summary mean) omite la veg == 0 puntos. ¿Cómo se puede prevenir esto? Simplemente quiero evitar mostrar la parte vacía de la gráfica, la ordenada de 0 a .2, pero no eliminar los datos asociados del cálculo de stat_summary.

Answer 1

puede hacerlo especificando el sistema coord:

df <- data.frame(age=c(10,10,20,20,25,25,25),veg=c(0,1,0,1,1,0,1)) 
g=ggplot(data=df,aes(x=age,y=veg)) 
g=g+stat_summary(fun.y=mean,geom="point") 
g+coord_cartesian(ylim=c(0.2,1)) #do not use +ylim() here