R 取消测试时将元素名称添加到单独的列中

当我取消列表列时，我希望使元素类别或元素名称（在下面的示例中为

category1

，

category2

）显示在一个单独的列中，如下所示。我尝试使用.sep和.u sep的名称，但似乎不起作用

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

df这是否有效：

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      

df%>%unnest（apples）%%>%mutate（`which name d.n matter`=paste0（'category'，x））
#一个tibble:3x3
x苹果`不管什么名字d.n都很重要`
1类别1
2 3类别2
3 2 4类别2
请使用
dput（）
函数显示数据，而不是发布图像。非常感谢。
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