Loops x[[jj]][iseq]中出现错误<；-vjj:替换的长度为零

有人能帮我解决这个错误吗？ 这是我代码的一部分：

    zahl = c(2:length(Daten$D_1))

    for (j in zahl){

      Daten[j,10] = ifelse(Daten[j,5]==0.00,0.00,
                  ifelse(Daten[j,5]==-1,1.00,MAM[Daten[j,8],Daten[j,9]]))
      Daten[j,11] = ifelse(Daten[j,5]==0.00,0.00,
                  ifelse(Daten[j,5]==-1,1.00,JJA[Daten[j,8],Daten[j,9]]))
      Daten[j,12] = ifelse(Daten[j,5]==0.00,0.00,
                  ifelse(Daten[j,5]==-1,1.00,SON[Daten[j,8],Daten[j,9]]))
      Daten[j,13] = ifelse(Daten[j,5]==0.00,0.00,
                  ifelse(Daten[j,5]==-1,1.00,DJF[Daten[j,8],Daten[j,9]]))
    }

我总是得到“x[[jj]][iseq]中的错误可能是