Czy istnieje ustawienie `par ()` dla koloru obszaru wydruku?

Zastanawiam się, czy istnieje prosty sposób na pokolorowanie obszaru działki? Wierzępar()$bg ustawienie określa kolor tła całego urządzenia, dlatego zastosowałem polecenie drukowania niskiego poziomupolygon aby dodać kolorowy prostokąt do całego obszaru wydruku.

Przykład
#colored device background
x11()
par(bg="grey90")
plot(x=1, y=2)
grid(col="white", lty=1)
points(x=1, y=2)

#colored plot area only
x11()
plot(x=1, y=2)
usr <- par()$usr
polygon(x=c(usr[1], usr[1], usr[2], usr[2]), y=c(usr[3], usr[4], usr[4], usr[3]), col="grey90")
grid(col="white", lty=1)
points(x=1, y=2)

Może to być jedyny sposób, aby to zrobić, ale jeśli istnieje bardziej bezpośredni sposóbpar ustawienia, chciałbym wiedzieć. Z góry dziękuję za wszelkie porady.

questionAnswers(1)

yourAnswerToTheQuestion