时间戳

首页 > 解决方案 > 在向量列表中，将每个向量转换为字符串，然后转换为 R 中的数据帧

r - 在向量列表中，将每个向量转换为字符串，然后转换为 R 中的数据帧

问题描述

我有一个向量列表 j，看起来像这样：

>j
[[1]
[1] "a" "b" "c"

[[2]]
[1] "c" "c" 

[[3]]
[1] "d" "d" "d" "a" "a" 
.
. 
.

我想将其转换为一个数据框，该数据框有一列，每个向量内容连接在一起。所以该列看起来像：

  Column_Name
1       a b c 
2         c c 
3   d d d a a

我尝试过使用 Replace() 函数以及我将在之后使用的循环：

for (x in 1:length(j)){ 
  j[x] = paste(j[x], collapse = " ")
}

 j <- data.frame(matrix(unlist(j), nrow=length(j), byrow=T)

任何指导将不胜感激。谢谢你。

标签： rlistdataframevector

解决方案

正如您自己尝试过的那样，该sapply函数与collapseof 的参数一起paste应该将其全部包装到 a 中data.frame：

# Toy data
set.seed(1)
j <- replicate(5, rep(sample(letters, 1), sample(1:10,1)))
print(j)
#[[1]]
#[1] "g" "g" "g" "g"
#
#[[2]]
# [1] "o" "o" "o" "o" "o" "o" "o" "o" "o" "o"
#
#[[3]]
#[1] "f" "f" "f" "f" "f" "f" "f" "f" "f"
#
#[[4]]
#[1] "y" "y" "y" "y" "y" "y" "y"
#
#[[5]]
#[1] "q"

# Collapse each element and wrap into a data.frame
res <- data.frame("Column_name" = sapply(j, paste, collapse = " "))
print(res)
#          Column_name
#1             g g g g
#2 o o o o o o o o o o
#3   f f f f f f f f f
#4       y y y y y y y
#5                   q

对的每个元素sapply应用paste-functionlist以创建串联列表元素的字符向量。构造函数只是将该data.frame输出转换为想要的输出。

推荐阅读