如何在一个图中的箭头上添加文本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) 

上的箭头我想上的箭头添加文本对象（“方向”）。

的图像是如下：

Answer 1

你看着使用text？

e.g，

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) 

取决于你在做什么，大概可以编程理清文本和适当的角度坐标。