R拟合文本在abline上

我想在fx上放置一个文本字符串. abline(0,0.2)

但是数据在我的for循环中的比例正在变化(fx.0,01-1和5-2000),那么如何控制文本的位置以便它总是很好地位于图中的abline?

(没有循环):

#example data row 1
x1<-1:10 
y1<-10:1

plot(x1,y1)
abline(0,0.2)
text(?,?,"text",srt=0.2)

最佳答案 这是我的,它应该扩展到图的斜率和比例:

x1<-1:10 
y1<-10:1

a<-0
b<-0.2
plot(x1,y1)
abline(a,b)
text(mean(x1),(b*max(x1)/2+a),"text",srt=0.2,pos=3)

参数pos = 3表示文本应偏移到您指定的点之上,而图中的x和y参数只是该行的中间x点.

编辑:设置srt = b * 45将沿着线条旋转文本,但是对于较小的缩放图,妈咪可能会烦躁不安.

点赞