¿Cómo aplicar el sombreado cruzado a un polígono utilizando el sistema gráfico de cuadrícula?

Varias funciones en el sistema gráfico base de R, incluyendorect() ypolygon(), soporte de sombreado a través de suangle= ydensity= 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)

¿Cómo podría aplicar un sombreado cruzado similar a un polígono dibujado por elcuadrícula sistema gráficogrid.polygon() función:

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

He buscado en la documentación?grid.polygon y?gpar, y he leído el libro de Paul Murrel sobre gráficos R, y hasta ahora he quedado vacío. ¿Me estoy perdiendo algo obvio? Si no, ¿hay algún truco simple que lo haga posible?

Respuestas a la pregunta(1)

Su respuesta a la pregunta