我只需要将我的数据框复制n次(例如100次),并将所有输出保存到列表中。
这应该很容易和直接,但是我还没有找到任何解决方案。
虚假数据框:
df = read.table(text = 'a b
1 2
5 6
4 4
11 78
23 99', header = TRUE)
使用 lapply
:
df_list <- lapply(1:100, function(x) df)
replicate
。n <- 100
lst <- replicate(n, df, simplify = FALSE)
如果您将 rep
放在 list
中,那么它可以返回与输入对象相同类型的结果:
df_list <- rep(list(df), 100)
str(df_list[1:2])
#> List of 2
#> $ :'data.frame': 5 obs. of 2 variables:
#> ..$ a: int [1:5] 1 5 4 11 23
#> ..$ b: int [1:5] 2 6 4 78 99
#> $ :'data.frame': 5 obs. of 2 variables:
#> ..$ a: int [1:5] 1 5 4 11 23
#> ..$ b: int [1:5] 2 6 4 78 99