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=g+ylim(0.2,1)
不幸的是，使用上述命令更改轴限制会导致veg == 0子集从数据中删除，从而产生
“警告消息：删除了包含缺失值的4行（stat_summary）”
这很不好，因为现在数据图（stat_summary平均值）忽略了veg == 0点。如何预防？我只是想避免显示图表的空白部分-纵坐标从0到.2，但不删除stat_summary计算中的关联数据。
最佳答案
您可以通过指定坐标系统来做到这一点：
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