从R中的列表创建数据框
dataframe creation from list in R
我在 R 环境中有一个名为 Vars
的列表,它是一个 20 列表。每个 Vars, i=1,2,...,10.
都有类似这样的输出:
var co
1 (Intercept) 2.446776739
2 x2 1.483926503
3 x8 0.379060372
4 x10 2.330205729
5 x15 1.399578214
我想创建一个数据框,其中包含每个 Xi
的输出
其中 j
是 Vars
中显示的系数
每个 zet 都属于相应的变量 Xi
>zet
x1 x2 x3 x4 x5 x6 x7 x8 x9 x10
1 0.009704237 0.08319483 0.006421977 0.07528413 0.01538562 0.009653445 0.02759767 0.01827908 0.009425397 0.01119717
x11 x12 x13 x14 x15 x16 x17 x18 x19 x20
1 0.01777308 0.02659095 0.01598912 0.01195379 0.01881498 0.02790549 0.0312646 0.01879999 0.0108261 0.01627832
我相信 lapply
是可行的方法,但我不知道如何在 R.
中对其进行编码
我们可以在这里使用mapply
:
mapply(function(x, y) x*sum(y$coefficient), lambda, ssVarX)
类似于purrr
的map2_dbl
:
purrr::map2_dbl(lambda, ssVarX, ~.x * sum(.y$coefficient))
我们可以使用 lapply
来自 base R
lapply(seq_along(ssVarX), function(i)lambda[i] * sum(ssVarX[[i]]$coefficient))
我在 R 环境中有一个名为 Vars
的列表,它是一个 20 列表。每个 Vars, i=1,2,...,10.
都有类似这样的输出:
var co
1 (Intercept) 2.446776739
2 x2 1.483926503
3 x8 0.379060372
4 x10 2.330205729
5 x15 1.399578214
我想创建一个数据框,其中包含每个 Xi
其中 j
是 Vars
中显示的系数
每个 zet 都属于相应的变量 Xi
>zet
x1 x2 x3 x4 x5 x6 x7 x8 x9 x10
1 0.009704237 0.08319483 0.006421977 0.07528413 0.01538562 0.009653445 0.02759767 0.01827908 0.009425397 0.01119717
x11 x12 x13 x14 x15 x16 x17 x18 x19 x20
1 0.01777308 0.02659095 0.01598912 0.01195379 0.01881498 0.02790549 0.0312646 0.01879999 0.0108261 0.01627832
我相信 lapply
是可行的方法,但我不知道如何在 R.
我们可以在这里使用mapply
:
mapply(function(x, y) x*sum(y$coefficient), lambda, ssVarX)
类似于purrr
的map2_dbl
:
purrr::map2_dbl(lambda, ssVarX, ~.x * sum(.y$coefficient))
我们可以使用 lapply
来自 base R
lapply(seq_along(ssVarX), function(i)lambda[i] * sum(ssVarX[[i]]$coefficient))