r - 按年订购 facet_wrap 绘图的更简单方法

Question

我有 20 年的体重数据，我想用 ggplot2 制作一个 10 行乘 2 列的 facet_wrap 图形。问题是我想以这样的方式重新排序构面，使前十年在左栏中，最后十年在右栏中。

我可以按照其他帖子中的建议手动重新排序级别，但这相当痛苦。此外，如果我想做同样的事情但不同的年份，我将不得不再次重新排序。

有没有更简单的方法 ？这是一个例子来说明我在说什么：

sub.data$year = factor(sub.data$year, 
                       levels = c(2000,2005,2001,2006,2002,2007,2003,2008,2004,2009...))

ggplot(data = sub.data, aes(x = sub.data$weight)) +
  geom_histogram() + facet_wrap(~ year, ncol = 2)

谢谢

标签： rggplot2facet-wrap

Answer 1

我认为你需要dir = "v".

library(tidyverse)

df <- data.frame(year = rep(2001:2020, 5), x = runif(100), y = runif(100))

ggplot(df, aes(x, y)) +
  geom_point() +
  facet_wrap(~year, ncol = 2, dir = "v")

^{由reprex 包（v0.2.1）于 2018 年 11 月 11 日创建}