сделает код более понятным).
дал 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)
Теперь я хочу добавить метку (текст) для каждой точки. Информация находится в
names=paste("dot", 1:4, sep="")
Я безуспешно пытался следующее
panel.text(x=X2, y=X1, names)
или, используя directlabels
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
в основном каждая точка находится в другой группе? Есть ли другой способ сделать это?