Ändern Sie die Größe des Header-Panel in Gitter-Diagramm

Question

Ich möchte die header panel size und auch die font size der text innerhalb dieser ändern. Hier ein Beispiel:

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

Grundsätzlich muß ich die Größe der gray area und auch "first" und "second" Schriftgröße größer.

Answer 1

Sie benötigen das par.strip.text= Argument zu verwenden, die eine Liste mit den Komponenten akzeptiert jede von cex Angabe font, lines und lineheight (letzteres den Raum zwischen beliebigen mehrzeiligen Streifen Titel geben).

Zum Beispiel, versuchen Sie dies:

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