在图中给点加横纵坐标的方法

[useR！]

蝇子/ka(330284791)
text（）中可以通过label对点说明。可是我要在点上加横纵坐标怎么办呢

我不知道有没有命令可以实现，自己弄了个粗糙的，跟大家探讨下哈。
x<-1:10
y<-2*x
m<-paste("(",as.character(x),",",as.character(y),")",seq="")
#paste把字符连接成字符串
plot(x,y)
text(x,y,m)

很粗糙哈，不过实现了要求。