library(ggplot2)library(pROC)###读取数据并查看数据情况setwd("D:\\student_recognition")student<-read.csv("student.csv")str(student) #查看变量apply(student,2,function(x){mean(x=='NULL'|x=="")}) #查看缺失值情况###数据预处理