library(reshape) #变量名修改
newdata <- rename(newdata,c(dc028 = "swb"))
table(newdata$swb)
或者
colnames(newdata)[which(colnames(newdata)=='tb2_a_p')]='sex'
table(newdata$sex)
library(reshape) #变量名修改
newdata <- rename(newdata,c(dc028 = "swb"))
table(newdata$swb)
或者
colnames(newdata)[which(colnames(newdata)=='tb2_a_p')]='sex'
table(newdata$sex)