R中循環循環的多元回歸

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)

下次提問時，要清楚具體。 “我在循環中使用循環但結果完全錯誤”是什么意思？ 錯誤信息等？