验证数据集中是否有缺失值                      sum(is,na(data))   返回缺失值的个数

缺失值在哪                                               which(is.na(data), arr.ind=T)                       arr.int 返回缺失值相应的行坐标

直接删除有缺失值的行                              data <-  na.omit(data)