r - bwplot 的 boxplot lwd 参数等效

Question

我想用更粗的线绘制方框。在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(...)
})

Answer 1

正如 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(...)
       })