为 R 中的箱线图以给定度数旋转 x 轴标签

Question

我用下面的代码生成了一个箱线图:

boxplot(top10threads$affect ~ top10threads$ThreadID[], data = top10threads, xlab = "10 biggest Threads", ylab = "Affect", col=(c("gold","darkgreen")), srt=45)

但是您可能会注意到 x 轴上的一些标签丢失了，所以我想将它们旋转 45 度。我添加了 srt=45，但它不起作用。

通过设置las=2可以垂直旋转它们，但这并不是我需要的。

我该怎么做？谢谢。

Answer 1

首先，将 boxplot() 的输出存储为一个对象。它包含组的名称。您可以使用 $names 来获取它们。然后使用 text() 在轴上添加标签。参数 srt 适用于 text()。

bp <- boxplot(y ~ x, data = df, col = c("gold", "darkgreen"), xaxt = "n")
tick <- seq_along(bp$names)
axis(1, at = tick, labels = FALSE)
text(tick, par("usr")[3] - 0.3, bp$names, srt = 45, xpd = TRUE)

---

数据

df <- data.frame(x = sample(100:110, 100, TRUE), y = rnorm(100))