r - xyplot のヘッダーの色を変更するにはどうすればよいですか?

Question

ラティス パッケージの xyplot を使用していますが、ヘッダーの色を変更したいと考えています。現在、それは醜い薄オレンジ色です。

library(lattice)

x <- c(1:10, 1:10)
y <- c(10:1, 10:1)
z <- c(1:10, seq(1,20, by=2))
a = c(rep("one",10),rep("two",10))
DF <- data.frame(x, y, z, a)
xyplot(y ~ x | a, groups = z < 5, data = DF, col = c("black", "red"),
 pch=20, cex=0.3)

Answer 1

の内容をリセットする必要がありtrellis.par.get()$strip.background$colます。

単一のプロットに対してこれを行うには、次のpar.settings=引数を使用します。

xyplot(y ~ x | a, groups = z < 5, data = DF, col = c("black", "red"),
       pch = 20, cex = 0.3, 
       par.settings = list(strip.background=list(col="lightgrey")))

ストリップの背景色をより永続的にリセットするには、次を使用しますtrellis.par.set()。

trellis.par.set(strip.background=list(col="lightgrey"))

これを自分でどのように発見したかを確認するには、次のことを試してください。

names(trellis.par.get())
trellis.par.get("strip.background")

最後に、より複雑な (そして審美的に恐ろしい) ストリップ背景操作の例については、こちらを参照してください。