r - R 格子标签箭头

Question

我正在尝试在类似于下面的图中标记箭头。我希望能够将它们移动到我喜欢的地方，因为在我的实际情节中，箭头人将被扩展。有没有办法在 panel.arrows 或其他面板中标记箭头？

require(latticeExtra)
x<- 1:19
y<- 19:1
zeros <- (1:19)*0
plt <- xyplot(x~y)
plt <- plt + layer(panel.arrows(zeros,zeros,x,y,length=.1,col=1:19))
plt

Answer 1

 plt <- plt+layer(panel.text(x=x+0.5, y=y, letters[1:19]) )
 png("labels.png")
 print(plt)
 dev.off()