Creating data frame by using extracted coefficients from a list
我使用一组相同的自变量,但是使用了40个不同的因变量,进行了将近40个逻辑回归。我想从40条回归线中提取系数,并创建一个数据框以绘制点图。我认为最好将其可视化,而不是将所有回归线都放在同一张表中。
我不知道如何提取自变量的影响(每个方程式的系数类型相同)
如果能帮助我,不胜感激!
这是一个可复制的示例。
1 2 3 4 | set.seed(10) y <- matrix(rnorm(10000 * 14), ncol = 14) x <- matrix(rnorm(10000 * 2), ncol = 2) res <- lapply(1:14, function(i) lm(y[, i] ~ x)) |
尝试在列表
上使用
1 2 3 4 5 6 7 8 | > do.call(rbind, lapply(res, function(x) coef(x))) (Intercept) x1 x2 [1,] 1.440115e-03 -0.0198232209 -0.0005720764 [2,] -2.227644e-02 -0.0134155339 -0.0092420757 [3,] 3.535811e-03 -0.0284229117 0.0140198529 [4,] -2.031279e-02 0.0032004789 -0.0036719760 [5,] -1.127532e-02 -0.0004463859 -0.0116754425 [6,] -1.369851e-02 0.0174797415 0.0112791379 |
这是一个矩阵,使用