R数据整理1 去除缺失项

mengye02 发表于 2015-3-11 09:58
请问，如果只想去掉所有值都是缺失值的行或列，应该怎么做呢？谢谢！

1. > dat <- data.frame(x = c(1, NA, 2, NA), y = c(3, NA, NA, 5), z = c(NA, NA, NA, NA))
   
2. > dat
   
3.    x  y  z
   
4. 1  1  3 NA
   
5. 2 NA NA NA
   
6. 3  2 NA NA
   
7. 4 NA  5 NA
   
8. > row.na <- apply(dat, 1, function(x) all(is.na(x)))
   
9. > col.na <- apply(dat, 2, function(x) all(is.na(x)))
   
10. > row.na
    
11. [1] FALSE  TRUE FALSE FALSE
    
12. > col.na
    
13.     x     y     z
    
14. FALSE FALSE  TRUE
    
15. > dat[!row.na, !col.na]
    
16.    x  y
    
17. 1  1  3
    
18. 3  2 NA
    
19. 4 NA  5

复制代码

学习中。。。。。

多谢斑竹~~~~

谢谢斑竹