Подходит много формул одновременно, более быстрые варианты, чем lapply?
У меня есть список формул, которые я хочу вписать в данные, вместо того, чтобы запускать цикл, я бы хотел сделать это сразу, ради производительности. Оценки все еще должны быть отдельными, я не пытаюсь оценить SUR или что-то еще. Следующий код делает то, что я хочу
x <- matrix(rnorm(300),ncol=3)
y <- x %*% c(1,2,3)+rnorm(100)
formulae <-list(y~x[,1],
y~x[,2],
y~x[,1] + x[,2])
lapply(formulae,lm)
К сожалению, это становится несколько медленным, так как длинаformulae
увеличивается, есть ли способ действительно векторизовать это?
Если это какая-либо помощь, единственные результатыlm
Меня волнуют коэффициенты и некоторые стандартные ошибки.