在R中绘制以下阴影区域

Question

  

可能重复：
  Shading a kernel density plot between two points.

如何在R中绘制此图，假设是正常的pdf？

Answer 1

我回答了on StackOverflow一段时间以寻找密切相关的事情。问题确实是重复的，应该关闭。通过仔细阅读help(polygon)以及对现有示例的研究，可以回答所有这些如何在曲线下方隐藏问题。

Answer 2

获取阴影区域的代码如下：

plot(dnorm,-4,4,xlab="x",ylab="pdf")
xvals <- seq(-2,1,length=50)
dvals <- dnorm(xvals)
polygon(c(xvals,rev(xvals)),c(rep(0,50),rev(dvals)),col="gray")

结果：