r - 条形图标签的位置和文本长度

Question

我在使用某些标签时遇到问题。我正在 r 中绘制条形图，我有点震惊没有一个简单的命令可以将值放在顶部。无论如何，我希望这些标签在条形图中更加居中，并缩短有效数字，以便它们适合条形图。我也非常感谢任何有关如何简化此操作的建议。

我尝试过选项(数字=5)，但这对标签不起作用。我已经使用了 text(plot.name, tmp, labels= c(tmp) 但想尝试不使用它来使其更简单。我必须重新制作很多图。

tmp = c(mean(1.0000001:100),mean(100.0000001:200), mean(200.0000001:300), mean(300.0000001:400))

barplot(tmp, names=c("site 1", "site 2", "site 3", "site 4") )

text(1:4, tmp, label=tmp, pos=2, srt=90)

Answer 1

使用 round(tmp) 可以轻松解决数字问题。正如 @rawr 建议的那样，使用 barplot 的输出来定位标签。最后，如果您想在条形上方绘制数字，请添加 xpd=NA允许在绘图区域之外绘制最高条形的编号。

bp = barplot(tmp, names=c("site 1", "site 2", "site 3", "site 4") )
# numbers above bars
text(x=bp, y=tmp, labels=round(tmp,0), pos=3, xpd=NA)
# numbers within bars
text(x=bp, y=tmp, labels=round(tmp,0), pos=1)