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

本文介绍了将不同长度向量的列表转换为`tibble`的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述

我目前有一个不同长度的字符向量列表。如下所示：

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'))

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

推荐答案

您可以使用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(无整齐函数)轻松完成

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