我試圖用speedglm
實現比glm
更快的GLM估計,但爲什麼它更慢?爲什麼`speedglm`比`glm`慢?
set.seed(0)
n=1e3
p=1e3
x=matrix(runif(n*p),nrow=n)
y=sample(0:1,n,replace = T)
ptm <- proc.time()
fit=glm(y~x,family=binomial())
print(proc.time() - ptm)
# user system elapsed
# 10.71 0.07 10.78
library(speedglm)
ptm <- proc.time()
fit=speedglm(y~x,family=binomial())
print(proc.time() - ptm)
# user system elapsed
# 15.11 0.12 15.25
@李哲源ZheyuanLi感謝您的評論。爲什麼?我閱讀文檔就像$ O(p^2)$ – hxd1011
你應該解釋你的工作環境。如果你想盡可能快地完成許多小GLM(合理的可能性),你可能需要考慮直接使用'glm.fit()'... –
@BenBolker我試圖用300萬行進行Logistic迴歸, 〜1000列,想看看它在不同的包裝中運行速度有多快。 – hxd1011