r - 在 R 的直方图中正确标记 x 轴

Question

我试着正确命名 x 轴。

hist(InsectSprays$count, col='pink', xlab='Sprays', labels=levels(InsectSprays$spray), xaxt='n')
axis(1, at=unique(InsectSprays$spray), labels=levels(InsectSprays$spray))

但这会产生

我想要栏下方而不是顶部的字母。

Answer 1

您必须在直方图 bin 中点处绘制标签。如果你想删除轴而只有字母，padj 会将字母移近你刚删除的轴。

h <- hist(InsectSprays$count, plot = FALSE)

plot(h, xaxt = "n", xlab = "Insect Sprays", ylab = "Counts",
     main = "", col = "pink")
axis(1, h$mids, labels = LETTERS[1:6], tick = FALSE, padj= -1.5)