0

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

有人会建议如何根据因子变量在 x 轴上显示离散 x 轴的每个第二个标签吗?

(非常感谢任何人的帮助和抱歉,如果我在这里抛出错误的术语。我是 R 新手,只是想尽可能准确地描述一切。)

4

1 回答 1

2

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
于 2021-02-19T11:17:03.177 回答