在网格图中更改标题面板的大小

Question

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

text

基本上我需要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"字体大小的大小。

Answer 1

您需要使用par.strip.text=参数，该参数接受包含指定cex，font，lines和lineheight中任意内容的组件的列表（后者在任何多行条带标题之间给出了空间。）

例如，试试这个：

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")))