r - 设置多边形的背景颜色

Question

有没有办法设置多边形的背景颜色？我想得到这样的情节......

set.seed(1)
n <- 100
xx <- c(0:n, n:0)
yy <- c(c(0,cumsum(stats::rnorm(n))), rev(c(0,cumsum(stats::rnorm(n)))))

plot   (xx, yy, type="n", xlab="Time", ylab="Distance")
polygon(xx, yy, angle=45, density=10)
polygon(xx, yy+5, col="white")
polygon(xx, yy+5, angle=45, density=10, col="red")

但理想情况下没有倒数第二行来设置背景(我正在编写的函数中绘制多个多边形)。我可以在最后一行中使用一个论点来否定整个倒数第二行吗？干杯。

Answer 1

我的回答是“否”- help(polygon) 为您提供了用于填充多边形的 col，但如果使用 angle，也将其用于线条阴影颜色 和密度。

这是过去的遗迹，那时您的笔式绘图仪一次只能拿起一支笔...

做两次应该没有问题。编写您自己的函数，它接受一个多边形和两个颜色参数并调用 polygon 两次。