从列表中包含的字符串命名 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

当然也可以用于多列。