r - 从列表中包含的字符串命名 df 列

Question

如果我有示例列表 Names

Names <- list(A = c("one", "two", "three"),
              B = c("three", "four", "five"))

然后是否可以使用列表中包含的字符串之一创建列标题？例如，下面的代码试图通过索引 Names[[1]][1] 创建名为 One 的列，但显然行不通。

data.frame(Names[[1]][1] = rep(5, 5))

如有任何建议，我们将不胜感激。我尝试用 as.character() 包装，但仍在寻找解决方案。真实数据在一个循环中实现，需要 Names 索引。所需的结果如下所示。

data.frame(One = rep(5, 5))

Answer 1

我们可以使用 setnames 将列名从变量分配给数据框:

setNames(data.frame(rep(5, 5)), Names[[1]][1]) 

#  one
#1   5
#2   5
#3   5
#4   5
#5   5

当然也可以用于多列。