[Rcode]ifelse函数：用平均值替代缺失值，或对数据不同水平分组

[Rcode]ifelse函数：用平均值替代缺失值，或对数据不同水平分组

 一 处理缺失值 dta$PM2.5 <- ifelse(is.na(dta$PM2.5), mean(dta$PM2.5, na.rm=TRUE), dta$PM2.5) #把NA值用均值替代

data$x <- ifelse(is.na(data$x), 0, x)  #NA值用0替换

二 对数据分组 dta$Level<- ifelse(dta$PM2.5<=35, '优良', ifelse(dta$PM2.5<=75, '轻度污染', ifelse(dta$PM2.5<=150, '中度污染', '重度污染')))