追加数据框到列表

Question

我想弄清楚如何将data.frame或data.table添加到列表中的第一个位置。

理想情况下，我想结构如下列表：

List of 4 
$ :'data.frame': 1 obs. of 3 variables: 
    ..$ a: num 2 
    ..$ b: num 1 
    ..$ c: num 3 
$ d: num 4 
$ e: num 5 
$ f: num 6 

注意data.frame是列表的结构内的对象。

问题是，我需要在列表创建后将数据框添加到列表中，并且数据框必须是列表中的第一个元素。我想做到这一点使用一些简单的像append，但是当我尝试：

append(list(1,2,3),data.frame(a=2,b=1,c=3),after=0) 

我得到结构的列表：

str(append(list(1,2,3),data.frame(a=2,b=1,c=3),after=0)) 
List of 6 
$ a: num 2 
$ b: num 1 
$ c: num 3 
$ : num 1 
$ : num 2 
$ : num 3 

看来，R为强迫data.frame成一个列表当我试图append。我如何阻止它这样做？或者可能有什么替代方法来构建这个列表，在列表初始创建后，将data.frame插入位置1的列表中。

Answer 1

您遇到的问题是要将数据框放到列表中的任何位置作为单个列表元素，它必须用list()包装。我们来看一下。

df <- data.frame(1, 2, 3) 
x <- as.list(1:3) 

如果我们只是c()包裹，这是append()是引擎盖下做的，我们得到

c(df) 
# $X1 
# [1] 1 
# 
# $X2 
# [1] 2 
# 
# $X3 
# [1] 3 

但是，如果我们在list()包裹它，我们得到一个包含数据帧所需的列表元素。

list(df) 
# [[1]] 
# X1 X2 X3 
# 1 1 2 3 

因此，由于x已经是一个列表，我们将需要使用以下构造。

c(list(df), x) ## or append(x, list(df), 0) 
# [[1]] 
# X1 X2 X3 
# 1 1 2 3 
# 
# [[2]] 
# [1] 1 
# 
# [[3]] 
# [1] 2 
# 
# [[4]] 
# [1] 3