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

时间:2011-09-10 17:46:40

标签: r lattice

如何更改格子图条中显示的文字? 例: 假设我有一个由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))

没有给出理想的结果。

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

2 个答案:

答案 0 :(得分:14)

我认为您想要的是:

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

答案 1 :(得分:8)

如果你将角色向量作为一个因素,那么你可以改变等级:

> 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!