如何在 R 中的绘图中的箭头上添加文本
How add a text over an arrow in a plot in R
我使用 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)
在箭头上我想在箭头上添加一个文本对象 ("Direction")。
图片如下：
您是否考虑过使用 text？
例如，
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)
根据您的操作，可能可以通过编程方式整理出文本的坐标和适当的角度。
我使用 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)
在箭头上我想在箭头上添加一个文本对象 ("Direction")。
图片如下：
您是否考虑过使用 text？
例如，
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)
根据您的操作，可能可以通过编程方式整理出文本的坐标和适当的角度。