使用多边形在R中的曲线下绘制区域

Question

嗨，我正在尝试在x轴上25以上的线下进行着色，但它要么不显示任何内容，要么给我错误，x和y的长度不同，任何帮助都将非常有用，谢谢Rob

Answer 1

您需要从一些情节开始。 polygon仅添加到现有图中。 另外，您需要包括一些额外的点才能获得曲线下方而不是上方的面积。

x2 = c(x, 40, 25)
y2 = c(y, 0, 0)
plot(x,y, type="n")
polygon(x2,y2, col="yellow")

Answer 2

这是另一种方式。

x <- 25:40
y <- dpois(x, 23.83)
plot(x, y, type = "n")
polygon(c(x, rev(x)), c(y, rep(0, length(y))), col = "yellow")