2016-09-17 10 views
-2

以下の回帰を実行したい問題がある変数はEPであり、ダミー変数であり、異なるケースをチェックする必要があります。z(lenght = 1000)はしきい値変数です。 Ⅰは、z変数からEPの1000の異なる変数を集め、係数を保存したいと考えています。私はループ内のループを使用しますが、結果は完全に間違っています。コードは正しく実行され、エラーは発生しません。角括弧とかっこは私が実行するコードです。問題は、膨大な遅延があり、2時間後も結果がまだ実行されていることです。ループ内のループを含む複数の回帰R

私はサンプルを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]  
    } 

答えて

2

あなたはi -loopため閉じ}を持っていません。 dynlmには、)のクローズもありません。

注意、あなたは本当にはっきりと具体的に、

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

で質問をして次の時間をあなたのiループを置き換えることができます。 「ループ内のループを使用しますが、結果は完全に間違っています」という意味はどうですか?エラーメッセージなど?

+2

IMHO最後の段落は、コメントセクションに属します。 – noumenal

関連する問題