- for (i in 1:length(loans$status)){
- if (loans$status[i] == "A") {loans$bad_good<-0} #这里的bad_good变量是原数据集中就存在的吗?建议写成loans[, 'bad_good']
- else if (loans$status[i] == "B") {loans$bad_good<-1}
- else if (loans$status[i] == "D") {loans$bad_good<-1} #这里的赋值有重复
- else {loans$bad_good<-NA}
- }