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")

しかし、理想的には、背景を設定するための最後から 2 番目の行はありません (私が書いている関数内で複数のポリゴンをプロットしています)。最後から 2 番目の行全体を否定する最終行で使用できる引数はありますか? 乾杯。

Answer 1

私の答えは「いいえ」help(polygon)です。colangledensity

これは、ペンプロッターが一度に 1 本のペンしか持てなかった昔の名残です...

2回やっても問題ありません。ポリゴンと 2 つの色パラメーターを取り、polygon2 回呼び出す独自の関数を記述します。