是否可以在绘图中使用两个以上的字符作为点

Question

我试图在绘图中绘制点,其中每个点由数字表示.但是,似乎这些点只能是一个字符长,正如您在下面的代码生成的图中可以看到的那样:

set.seed(1); plot(rnorm(15), pch=paste(1:15))

我想知道是否有任何解决方法.谢谢.

Answer 1

set.seed(1); plot(rnorm(15), pch=paste(1:15),type='n')
text(x=1:15,y=rnorm(15),label=round(rnorm(15),2))

另一个网格选项使用lattice例如:

dat <- data.frame(x=1:15,y=rnorm(15))
xyplot(y~x,data=dat,
       panel=function(x,y,...){
         panel.xyplot(x,y,...)
         panel.text(x,y,label=round(rnorm(15),2),adj=2,col='red')})