更改格子图中 header 面板的大小

Question

我想更改其中的 header panel size 以及 text 的 font size。这是一个例子：

library(lattice)
dat <-data.frame(a=(rnorm(50)),b=(rnorm(50)),c=(c(rep("first",25),rep("second",25))))
xyplot(a~b|c, data=dat,par.settings = list(strip.background=list(col="gray")))

基本上我需要 gray area 的大小以及 "first" 和 "second" 的字体大小。

Answer 1

您需要使用 par.strip.text= 参数，它接受一个列表，其中的组件指定 cex、font、lines 和 lineheight （后者在任何 multi-line 片段标题之间给出 space）。

例如，试试这个：

stripParams <- list(cex=2, lines=1.5)
xyplot(a~b|c, data=dat,
       par.strip.text = stripParams,
       par.settings = list(strip.background=list(col="gray")))