Несколько функций в базовой графической системе R, в том числеrect() а такжеpolygon()Поддержите штриховку через своиangle= а такжеdensity= аргументы:

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)

Как я могу применить аналогичную перекрестную штриховку к многоугольнику, нарисованномусетка графическая системаgrid.polygon() функция:

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

Я посмотрел в документации для?grid.polygon а также?gparи пролистали книгу Пола Мюррела о R графике, и до сих пор вышли пустыми. Я что-то упускаю из виду? Если нет, есть ли какой-нибудь простой взлом, который сделает это возможным?