r - 更改格子图中条带上的文本

Question

如何更改格子图中显示的文本？示例：假设我有一个由 3 列组成的数据框测试

x
 [1]  1  2  3  4  5  6  7  8  9 10

y
 [1] "A" "A" "A" "A" "A" "B" "B" "B" "B" "B"

a
 [1] -1.9952066 -1.7292978 -0.8789127 -0.1322849 -0.1046782  0.4872866
 [7]  0.5199228  0.5626998  0.6392686  1.6604549

对格子图的正常调用

xyplot(a~x | y,data=test)

将给出带有文本“A”和“B”的情节

我怎样才能得到不同的文字写在纸条上？

另一个字符向量的尝试

z
 [1] "a" "a" "a" "a" "a" "b" "b" "b" "b" "b"

并打电话给strip.custom()

xyplot(a~x | y,data=test,strip=strip.custom(var.name=z))

没有给出预期的结果。

实际上，这是一个国际化问题。

Answer 1

我认为您想要的可以通过以下方式获得：

z <-c( "a" , "b" ) # Same number of values as there are panels
xyplot(a~x | y,data=test,strip=strip.custom(factor.levels=z))

Answer 2

如果您将字符向量作为一个因素，那么您只需更改级别：

> xyplot(a~x | y,data=test)       # your plot
> test$y=as.factor(test$y)        # convert y to factor
> xyplot(a~x | y,data=test)       # should be identical
> levels(test$y)=c("Argh","Boo")  # change the level labels
> xyplot(a~x | y,data=test)       # new panel labels!