r - 如何使用 dplyr 管道一次性取消嵌套数据帧的多个列表列

Question

我有以下小标题，它有两个嵌套列：

library(tidyverse)
df <- structure(list(a = list(c("a", "b"), "c"), b = list(c("1", "2", 
"3"), "3"), c = c(11, 22)), class = c("tbl_df", "tbl", "data.frame"
), row.names = c(NA, -2L))

产生：

# A tibble: 2 x 3
  a         b             c
  <list>    <list>    <dbl>
1 <chr [2]> <chr [3]>    11
2 <chr [1]> <chr [1]>    22

我怎样才能一次将它们解开，产生一个小标题？

我试过这个但失败了：

> df %>% unnest(a, b)
Error: All nested columns must have the same number of elements.

标签： rdplyrtidyr

Answer 1

可能有一种更清洁的方法，但如果你想要列的笛卡尔积，你可以按顺序取消它们，如果没有别的：

> df %>% 
    unnest(a, .drop = FALSE) %>% 
    unnest(b, .drop = FALSE)

# # A tibble: 7 x 3
#       c a     b    
#   <dbl> <chr> <chr>
# 1    11 a     1    
# 2    11 a     2    
# 3    11 a     3    
# 4    11 b     1    
# 5    11 b     2    
# 6    11 b     3    
# 7    22 c     3