从R Graph Gallery,非常简单:
# Create data for the area to shade
cord.x <- c(-3,seq(-3,-1,0.01),-1)
cord.y <- c(0,dnorm(seq(-3,-1,0.01)),0)
# Make a curve
curve(dnorm(x,0,1), xlim=c(-3,3), main='Standard Normal')
# Add the shaded area.
polygon(cord.x,cord.y,col='skyblue')
现在我们添加缺失点
s <- sample(1:length(cord.x),4,T)
cord.x[s] <- NA
cord.y[s] <- NA
curve(dnorm(x,0,1), xlim=c(-3,3), main='Standard Normal')
polygon(cord.x,cord.y,col='skyblue')
和&#34;错误&#34;区域是阴影,即我不想被遮蔽的区域......
最快的解决方案是na.approx缺失值,但有一种智能/自动方式来解决这个问题吗? 为曲线的每个na.contiguous部分添加多个多边形?
任何建议表示赞赏。 甲