打印区域颜色是否有'par（）`设置？

我想知道是否有一种简单的方法只给绘图区域上色？我相信par$bg设置定义了整个设备背景的颜色，因此我一直在应用低级打印命令polygon向整个打印区域添加一个彩色矩形

实例

---

<>这可能是唯一的方法，但是如果在PAR设置中有一种更直接的方式，我很想知道。谢谢你的任何建议。

< P>我很确定，没有任何自相矛盾的论点，你自己想做什么就做什么。 不过，这里有一个比您更简单的方法。它使用plot.default的panel.first参数在背景中绘制一个以原点为中心的巨大填充点。这一点的范围在各个方向上都至少是一个googol立方单位，我已经证实，这在R的原生Windows绘图设备以及pdf和png设备上都有效：这似乎是一个相当普遍的解决方案

## Your example
plot(x=1, y=2, 
     panel.first={points(0, 0, pch=16, cex=1e6, col="grey90")
                  grid(col="white", lty=1)})

## Or, for repeated use, make it a function:
ggbg <- function() {
    points(0, 0, pch=16, cex=1e6, col="grey90")
    grid(col="white", lty=1)
}
plot(x=1, y=2, panel.first=ggbg())

---

我经常看到使用rect而不是多边形来完成这项工作，但除此之外，我不相信我在基础图形中见过其他不同的方法。@joran-rect确实更简单-谢谢你的评论。嗯。。。那里应该是古戈-@Josh O'Brien+1-有趣的解决方案！干杯。@CarlWitthoft-谢谢！所以应该这样。我不知道我小时候那个词是怎么拼的！

## Your example
plot(x=1, y=2, 
     panel.first={points(0, 0, pch=16, cex=1e6, col="grey90")
                  grid(col="white", lty=1)})

## Or, for repeated use, make it a function:
ggbg <- function() {
    points(0, 0, pch=16, cex=1e6, col="grey90")
    grid(col="white", lty=1)
}
plot(x=1, y=2, panel.first=ggbg())

## Also works for plots running out to 1e300 in each direction
plot(x=-1e300, y=1e300, panel.first=ggbg())