R直方图，条形图下有数字

Question

我在尝试绘制直方图以显示每个值的频率时遇到了一些问题，同时也绘制了值。例如，假设我使用以下代码：

x <- sample(1:10,1000,replace=T)
hist(x,label=TRUE)

结果是一个在条形图上带有标签的图，但是将 1 和 2 的频率合并在一个条形图中。除了将此栏分成另外两个 1 和 2 之外，我还需要将值放在每个栏下。例如，使用上面的代码，我会在其条形图右边缘的刻度线下方显示数字 10，并且我需要在条形图下方绘制值。

有什么方法可以在带有 hist 函数的单个直方图中完成这两项操作？

提前致谢！

Answer 1

默默地调用histreturns您可以用来修改剧情的信息。您可以提取中点和高度，并使用该信息将标签放在您想要的位置。您可以在 text 中使用 pos 参数来指定标签相对于点的位置（感谢@rawr）

x <- sample(1:10,1000,replace=T)

## Histogram
info <- hist(x, breaks = 0:10)
with(info, text(mids, counts, labels=counts, pos=1))

R histogram with numbers under bars