如何在R中的图中的箭头上添加文本

Question

我使用R在图表中绘制了两个点,并用箭头连接点.如何在箭头上添加文本.(固定文本)我的代码如下:

x<-y<-1
new.x<-2
new.y<-2  
Text<-"Direction"
plot(x, y, xaxt='n',yaxt='n',cex=10,pch=19,xlim=c(0,4), ylim=c(0,3))
points(new.x,new.y,cex=10,pch=19)
arrows(x, y, new.x, new.y, col = "orange",lwd=4,lty=4)

在箭头上我想在箭头上添加一个Text对象("Direction").

图像如下:

Answer 1

你看过使用文字吗？

例如,

x<-y<-1
new.x<-2
new.y<-2  
Text<-"Direction"
plot(x, y, xaxt='n',yaxt='n',cex=10,pch=19,xlim=c(0,4), ylim=c(0,3))
  points(new.x,new.y,cex=10,pch=19)
  arrows(x, y, new.x, new.y, col = "orange",lwd=4,lty=4)
  text(x=1.4, y=1.6, label=Text, srt=35)

根据您正在进行的操作,可以通过编程方式对文本的坐标和适当的角度进行排序.