Como aplicar hachura cruzada em um polígono usando o sistema gráfico de grade?

Várias funções no sistema gráfico básico de R, incluindorect() epolygon(), suportam a hachura através do seuangle= edensity= argumentos:

x = c(0, 0.5, 1, 0.5)
y = c(0.5, 1, 0.5, 0)
par(mar=c(0,0,0,0))
plot.new()
polygon(x, y, angle=45, density=10)

Como posso aplicar hachuras semelhantes a um polígono desenhado pelograde sistema gráficogrid.polygon() função:

library(grid)
grid.newpage()
grid.polygon(x,y)

Eu procurei na documentação por?grid.polygon e?gpar, e folhearam o livro de Paul Murrel sobre gráficos R e, até agora, ficaram vazios. Estou perdendo algo óbvio? Caso contrário, existe algum truque simples que tornará isso possível?

questionAnswers(1)

yourAnswerToTheQuestion