Rは私のifループ条件を守っていません

Question

いくつかの値を与えてカテゴリ変数を作成しています。 ifループは実行されますが、存在しなければならないにもかかわらず "D"で何の観測も与えません。何が起きているのか知っていますか？

ありがとうございます。

data$n_clasif<-"D" 
for (i in 1:n){ 
    if (data$forecast[i]>=10000){ 
     data$n_clasif[i]="A" 
    } else if (data$forecast[i]<10000 & data$forecast[i]>=2000){ 
     data$n_clasif[i]="B" 
    } else if (data$forecast[i]<2000 && data$CL_CLASIF_ROLLO[i]!="D"){ 
     data$n_clasif[i]="C" 
    } else { 
     data$n_clasif[i]="D" 
    } 
} 

Answer 1

n <- 100 
data <- data.frame(forecast = runif(n, min =1, max = 20000), 
       n_clasif = NA, 
       CL_CLASIF_ROLLO = c('A','D')) 
for (i in 1:n){ 
    if(data$forecast[i]>=10000){ 
    data$n_clasif[i]<-"A" 
} else if(data$forecast[i]<10000 & data$forecast[i]>=2000){ 
    data$n_clasif[i]<-"B" 
} else if(data$forecast[i]<2000 & data$CL_CLASIF_ROLLO[i]!="D"){ 
    data$n_clasif[i]<-"C" 
} else { 
    data$n_clasif[i]<-"D" 
} 
} 

私はあなたのデータがどのように見えるかのいくつかの仮定をしました。