如何将文本放在绘图上的特定位置

Question

我写了这段代码是为了得到频率图上的均值和中位数：

library(descr)
freq(loc_data$VAR1)
me<-mean(loc_data$VAR1)
med<-median(loc_data$VAR1)
abline(v=me,col='blue',lwd=2)
abline(v=med,col='red',lwd=2)
text(10, 15, "mean", col = "blue")
text(1, 15, "median", col = "red")

然而，正如您所看到的，标签位于“0”线上，我无法找到将它们提升到垂直线附近较高位置的方法。有什么想法吗？

Answer 1

以下代码应该：

text(10, 20000, "mean", col="blue")
text(1, 20000, "median", col="red")

设置文本坐标时，必须注意x和y刻度。有关R图形的优秀电子书称为“R基础与图形”。

Answer 2

除了上述关于考虑X和Y标度的建议之外，您还可以简单地使用text（）中的adj参数来调整文本标签的位置。

x<-rnorm(100)
hist(x)
x.mean<-mean(x)
x.median<-median(x)
abline(v=x.mean, col="red")
abline(v=x.median, col="blue")

text(x.mean,0,labels="mean", adj=c(2,-1), col="red")

text(x.median,0,labels="median", adj=c(-1,-1), col="blue")