Question

我想运行以下回归，有问题的变量是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]    
  }

Answer 1

} - 循环没有结束i;你也没有)的结束dynlm。

注意，您可以通过

替换您的i-loop

EP <- as.integer(dS >= z)

下次提问时，要明确具体。你是什么意思＆＃34;我在循环中使用循环，但结果完全错误＆＃34;？错误信息等？

R中循环的多重回归

1 个答案: