在建立data.frame以后,给你的横纵变量重新定义level。
你现在的level()出来的结果就是,xtabs出来的结果。用data$edus=factor(data$edus,levels=c("beyond undergraduate"," junior high school ","senior high school & junior college"," under primary school ")) ,这样就实现了第二行和第三行的调换
在建立data.frame以后,给你的横纵变量重新定义level。
你现在的level()出来的结果就是,xtabs出来的结果。用data$edus=factor(data$edus,levels=c("beyond undergraduate"," junior high school ","senior high school & junior college"," under primary school ")) ,这样就实现了第二行和第三行的调换