R 格点图的同一面板中的两条或多条不同文本消息

给出以下带有人工数据集的晶格图示例：

library(lattice)
set.seed(120)
X<-rnorm(100)
Y<-rnorm(100)
Z<-c(rep("A",50),rep("B",50))
df1<-data.frame(X,Y,Z)

myx <- c(1,-1)
myy <- c(0,0)
MyText<-c("Panel 1 Text", "Panel 2 Text")

xyplot(X~Y|Z, data=df1,
panel=function(x, y,...){
panel.xyplot(x,y,...)
panel.text(myx[panel.number()],myy[panel.number()]
,labels=MyText[panel.number()])})

库（晶格）
种子集（120）
Xuse
panel.number（）
选择面板
panel.number（）==1
是，但这样我必须为单个面板中有两个文本的每个面板编号定义不同的向量
myx
myy
和
Mytext
。因此周围有很多向量，难道没有一种方法可以索引向量，就像我们可以索引
panel.number（）
使用
panel.number（）
来选择面板一样
panel.number（）==1
是，但这样我必须为单个面板中有两个文本的每个面板编号定义不同的向量
myx
myy
和
Mytext
。因此，周围有很多向量，难道没有一种方法可以像索引
panel.number（）