r - 等效于bwplot的boxplot lwd参数

我想用粗线绘制方框。在boxplot函数中，我只是放入lwd=2，但是在晶格bwplot中，我可以拔出头发，但没有找到解决方案！
（用方框表示上图是蓝色的东西）

使用的示例代码：

require(lattice)
set.seed(123)
n <- 300
type <- sample(c("city", "river", "village"), n, replace = TRUE)
month <- sample(c("may", "june"), n, replace = TRUE)
x <- rnorm(n)
df <- data.frame(x, type, month)

bwplot(x ~ type|month, data = df, panel=function(...) {
    panel.abline(h=0, col="green")
    panel.bwplot(...)
})

最佳答案

正如John Paul所指出的那样，线宽是由点阵图形参数列表的box.rectangle和box.umbrella组件控制的。 （供将来参考，键入names(trellis.par.get())是扫描由该列表控制的图形属性列表的快速方法。）

这是为一个或多个特定图形设置这些选项的更简洁的方法：

thickBoxSettings <- list(box.rectangle=list(lwd=2), box.umbrella=list(lwd=2))

bwplot(x ~ type|month, data = df,
       par.settings = thickBoxSettings,
       panel = function(...) {
           panel.abline(h=0, col="green")
           panel.bwplot(...)
       })