有三种方法  !is.na  , na.omit, complete.cases

创新互联是专业的鄂城网站建设公司，鄂城接单;提供成都网站设计、成都网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行鄂城网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!> d <- read.table("GWAS_s2.qassoc", header=T, stringsAsFactors=F)   // 文件行数 > nrow(d) [1] 431493 > d1 <- subset(d, select=c("CHR", "SNP", "BP", "P"))   // 计算非NA 的行数 > num.bool <- complete.cases(d1) > head(num.bool) [1] FALSE  TRUE  TRUE FALSE  TRUE  TRUE   > sum(num.bool)  [1] 363836                                                                                                                                                                                                                                          > dn1 <- d1[which(!is.na(d1$P)),]                                                                                                                                                  > nrow(dn1)                                                                                                                                                                        [1] 363836 > dn2 <- na.omit(d1) > nrow(dn2)                                                                                                                                                             [1] 363836 > dn3 <-d1[complete.cases(d1[,4]),]                                                                                                                                                > nrow(dn3)                                                                                                                                                                       [1] 363836 > dn4 <-d1[complete.cases(d1),]                                                                                                                                                   > nrow(dn4) [1] 363836

方法三和方法四， 一个是根据第四列是否为NA判断的， 一个是根据所有列。

另外有需要云服务器可以了解下创新互联cdcxhl.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。

网站题目：R语言移除缺失值NA-创新互联
当前路径：http://kswsj.cn/article/cdhdog.html