现在需要根据编码产生受教育年限变量educyear
写了一个程序,但赋值不对,
各位看看哪里错了
或者有什么更好的编程方法。
谢谢
load("chns_educ.rda")
names(educ)
educ <- within(educ, {
educyear <- a11
educyear[a11>=11 & a11<=16 & is.na(a11)==F] <- a11 - 10
educyear[a11>=21 & a11<=26 & is.na(a11)==F] <- a11 - 20 + 6
educyear[a11>=27 & a11<=29 & is.na(a11)==F] <- a11 - 17
educyear[a11>=31 & a11<=36 & is.na(a11)==F] <- a11 - 30 + 12
})
chns_educ.rar
(359.3 KB)
本附件包括:- chns_educ.rda


雷达卡




京公网安备 11010802022788号







