[英]Add labels on lattice xyplot
我用格子創建了一個 xyplot
library(lattice)
X1=c(5, -2, 1, -3)
X2=X1^2
names=paste("dot", 1:4, sep="")
xyplot(X2~X1, data=data.frame(X1, X2), pch=20, cex=1:4)
現在我想為每個點添加一個 label(文本)。 信息在
names=paste("dot", 1:4, sep="")
我試過以下沒有成功
panel.text(x=X2, y=X1, names)
或者,使用直接標簽
library(directlabels)
p=xyplot(X2~X1,data=data.frame(X1, X2), pch=20, group=names, cex=1:4)
direct.label(p,smart.grid,FALSE)
但我不太喜歡它,因為我不得不使用group=names
分成組,基本上每個點都在不同的組中? 還有另一種方法嗎?
您可以嘗試定義一個新面板 function:
xyplot(X2~X1, data=data.frame(X1, X2), pch=20, cex=1:4,
panel=function(x, y, ...) {
panel.xyplot(x, y, ...);
ltext(x=x, y=y, labels=names, pos=1, offset=1, cex=0.8)
})
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.