R：跳过离散 x 轴中的标签

Question

我正在尝试生成类似于 ggplot2 的收入直方图的东西。但是，因为我不是要在 y 轴上显示频率，而是要显示 data.frame 中的计算变量，我想我必须使用 geom_bar() 并将桶分配为我的 data.frame。现在，我想显示我已为其确定桶的所有条形图，但不显示 x 轴上的所有标签。我想一定有某种方法可以用 scale_x_discrete() 中的 breaks = 来做到这一点，但无法弄清楚如何让它只使用“每隔一个标签给我看一次”或类似的东西。

对于如何仅在基于因子变量的离散 x 轴的 x 轴上显示每隔一个标签，有人能提出建议吗？

（非常感谢大家的帮助，抱歉，如果我在这里使用了错误的术语。我是 R 的新手，只是想尽可能准确地描述所有内容。）

Answer 1

您可以为 breaks 参数提供可以处理特殊中断规则的函数。在下面的示例中，我们通过回收 c(TRUE, FALSE) 作为子集操作来选择所有奇数中断。

library(ggplot2)

ggplot(mpg, aes(class)) +
  geom_bar() +
  scale_x_discrete(breaks = function(x){x[c(TRUE, FALSE)]})

更多解释：

重复逻辑索引，直到它匹配它索引的向量的长度。如果逻辑索引是 c(TRUE, FALSE) if 将继续重复这个，所以它有效地拾取向量的每个奇数元素 x 因为长度为 2 的索引是重复的。

x <- 1:9

x[c(TRUE, FALSE)]
#> [1] 1 3 5 7 9

所以当你创建长度为 3 的索引时，这将重复 3 次。

x[c(TRUE, FALSE, TRUE)]
#> [1] 1 3 4 6 7 9

如果您想复制引擎盖下发生的事情，请按以下步骤操作。

i <- rep_len(c(TRUE, FALSE), length(x))

x[i]
#> [1] 1 3 5 7 9

R：跳过离散 x 轴中的标签

R: Skip labels in discrete x axis

r

ggplot2

axis-labels

discrete