取消嵌套时,将元素名称添加到单独的列中

问题描述

取消嵌套一列列表时,我要使元素类别或元素名称(在下面的示例中为category1category2)出现在单独的列中,如下所示。我尝试使用.sep和.names_sep,但似乎不起作用。

df <- tibble(x = 1:2,apples = list(category1 = 1,category2 = 3:4))

enter image description here

df_un.a<-unnest(df,apples)

enter image description here

我想要什么:

enter image description here

解决方法

这项工作:

df %>% unnest(apples) %>% mutate(`Whatever name d.n matter` = paste0('category',x))
# A tibble: 3 x 3
      x apples `Whatever name d.n matter`
  <int>  <dbl> <chr>                     
1     1      1 category1                 
2     2      3 category2                 
3     2      4 category2