【发布时间】:2016-09-17 06:51:56
【问题描述】:
我想运行以下回归,有问题的变量是 EP,是一个虚拟变量,我必须检查不同的情况,z (lenght=1000) 是阈值变量。我想从z变量中创建1000个不同的EP变量并保存系数。我在循环中使用了循环,但结果完全错误。代码运行正常,没有出错。方括号和括号是我运行的代码。问题是延迟很大,两个小时后的结果仍在运行。
我将样本减少了 99%,但我还是没有得到结果,代码运行没有问题。
我不想要任何特别的东西,只是让 z 的每个值运行不同的回归并最终存储估计值。我不明白为什么要花这么长时间。有什么想法吗?
for (k in 1:1000){
z<-u[k]
for (i in 1:length(dS)){
if (dS[i]>=z) {
EP[i]=1
} else {
EP[i]=0
}
fitT <- dynlm(dR ~ L(dR,1)+L(EN)+L(EP)+L(ΚΜ,1)
prob[[k]] <- summary(fitT)$coefficients[1, 2]
}
【问题讨论】:
标签: r loops regression