将可变长度列表的列表与固定列表相结合

Question

我有一个要合并的数据，其中包含长度不等的列表列表。例如

 A<- c("AA-1234", "AA-1245", "AA-12445")

B<- c( c("1", "2", "34", "aab5"), c("a3", "3e"), c(""))

所以A和B的行数相等，A中的第一行是id号，B行的元素是各自的响应。可以看到 for "AA-1234" 的元素有 4 个，for "AA-1234" 的元素有 2 个。我想要如下数据集：

   A         B
AA-1234      1
AA-1234      2
AA-1234      34
AA-1234      aab5
AA-1245      a3
AA-1245      3e
AA-12445

有什么建议吗？

 B<- list(c("1", "2", "34", "aab5"), c("a3", "3e"), c(""))

Answer 1

require(dplyr)

A<- c("AA-1234", "AA-1245", "AA-12445")

B<- c( list(c("1", "2", "34", "aab5")), list(c("a3", "3e")), list(""))




as_tibble(cbind(A,B)) %>%  
  mutate(A = unlist(A)) %>% 
  unnest(B)


# # A tibble: 7 x 2
#   A        B    
# <chr>    <chr>
# 1 AA-1234  1    
# 2 AA-1234  2    
# 3 AA-1234  34   
# 4 AA-1234  aab5 
# 5 AA-1245  a3   
# 6 AA-1245  3e   
# 7 AA-12445 ""

将可变长度列表的列表与固定列表相结合

combining the list of lists of varying length with a fixed list

r

plyr

dataframe

tidyr