r - 如何使用每组行号作为 x 绘制带有 `facet_wrap()` 的 `geom_point()`？

Question

有没有办法进行绘图geom_point()，使其隐含地使用行号作为x方面？就像plot(y)但也适用于多个方面。

以下失败Error: geom_point requires the following missing aesthetics: x：

df = data.frame(y = rnorm(60), group = rep(c("A", "B", "C"), 20))

ggplot(df, aes(y = y)) + 
  geom_point() + 
  facet_wrap(~group)

当然，您可以使用类似以下的方法来完成它，但它非常麻烦。

df = df %>%
  group_by(group) %>%
  mutate(row = row_number())

ggplot(df, aes(x = row, y = y)) +
  geom_point() + 
  facet_wrap(~group)

Answer 1

你可以试试这个：

ggplot(df, aes(x=seq(y),y = y))+geom_point() + facet_wrap(~group)

这样，您可以避免创建您提到的索引变量！！！