R从列表中提取数据框，列名中没有前缀

Question

我在列表中放置了一个数据框。然后，当尝试将其提取回来时 - 我得到了所有以该数据框的列表键为前缀的列名，有没有办法完全按照最初传递的方式提取数据框？

cols<-c("column1", "Column2", "Column3")
df1<-data.frame(matrix(ncol = 3, nrow = 1))
colnames(df1)<-cols
df1

result<-list()
result['df1']<-list(df1)

newdf1<-as.data.frame(result['df1'])
newdf1

获取结果（列名以df1为前缀）：

> cols<-c("column1", "Column2", "Column3")
> df1<-data.frame(matrix(ncol = 3, nrow = 1))
> colnames(df1)<-cols
> df1
  column1 Column2 Column3
1      NA      NA      NA
> 
> result<-list()
> result['df1']<-list(df1)
> 
> newdf1<-as.data.frame(result['df1'])
> newdf1
  df1.column1 df1.Column2 df1.Column3
1          NA          NA          NA

当然，我可以手动删除前缀，但可能有一种正确的方法可以做到这一点。 谢谢！

Answer 1

使用[[ 而不是[ 提取：

> newdf1 <- as.data.frame(result[['df1']])
> newdf1
  column1 Column2 Column3
1      NA      NA      NA

不同之处在于[ 提取包含所请求组件的列表。 [[ 直接提取请求的组件（即，它检索列表中该组件的内容，而不是包含该组件的列表）。

但由于df1 已经是一个数据框，为什么不直接这样做：

newdf1 <- result[['df1']]

？您不需要 as.data.frame() 部分。