数据框的嵌套列表 [使用 purrr + map]

Question

我看过很多帖子，所以如果这是多余的，我很抱歉，但希望获得一些帮助来压平嵌套列表：

test <- list()
test <- c(
  list("A" = c(list("1"), list("2"), list("3"))), 
  list("B" = c(list("4"), list("5"), list("6")))
)

所需输出

  name subcat
1    A      1
2    A      2
3    A      3
4    B      4
5    B      5
6    B      6

我正在努力编写一个嵌套的 for 循环，但我真的很想使用 purrr 或更优雅的东西来创建一个包含两列的数据框：子目录列和列表中每个元素的名称的重复列。

感谢您的任何帮助，甚至只是向我指出类似的帖子 - 谢谢！

Answer 1

对于这些更新的数据，您可以尝试：

library(tidyverse)
enframe(test) %>%  unnest_longer(value)

# A tibble: 6 x 2
#  name  value
#  <chr> <chr>
#1 A     1    
#2 A     2    
#3 A     3    
#4 B     4    
#5 B     5    
#6 B     6