Question

我目前有一个不同长度的字符向量列表。像这样：

list(
  c('this','is','first'),
  c('this','is','second','it','longer'),
  c('this is a list','that is length 2')
)

我希望将列表中每个向量的所有元素组合成tibble中的单个行。像这样：

data_frame(column_1 =
             c('this is first',
               'this is second it longer',
               'this is a list that is length 2'))

如果可能，我想使用tidyverse中的基本R或包。

Answer 1

您可以使用purrr和stringr

x <- list(
  c('this','is','first'),
  c('this','is','second','it','longer'),
  c('this is a list','that is length 2')
)

tibble(column1= map_chr(x, str_flatten, " "))

请注意，str_flatten是stringr_1.3.0

的新内容

这也可以使用基数R（无tidyverse函数）轻松完成

data.frame(column1 = sapply(x, paste, collapse= " "))

将不同长度向量的列表转换为“tibble”

1 个答案: