按组剪切 Tibble 并将其合并为列

Question

只是一个简单的问题。如何按组（即按年份）剪切数据并将它们附加为列？所有组的长度相同。

这就是我现在拥有的：

# A tibble: 6 x 2
   year   sex
  <dbl> <dbl>
1  2000     1
2  2000     2
3  2001     1
4  2001     2
5  2002     1
6  2002     2

我想要这样。

# A tibble: 2 x 6
  year1  sex1 year2  sex2 year3  sex3
  <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1  2000     1  2001     1  2002     1
2  2000     2  2001     2  2002     2

提前致谢

Answer 1

一种可能性是使用group_split，后跟bind_cols。

data %>% 
  group_by(year) %>%
  group_split() %>% 
  bind_cols()

但是，我建议不要这样做：生成的数据格式很难处理。