Thanks a lot, this works! The one I used before was wrong:
> data_matrix
[,1] [,2] [,3] [,4] [,5]
[1,] 1 1 NA 1 1
[2,] 2 2 2 2 2
[3,] 3 3 3 3 3
[4,] NA NA NA NA NA
[5,] 5 5 5 5 5
[6,] NA 6 6 NA 6
[7,] NA NA NA NA NA
> nas1a <- apply(data_matrix,1,function(x)sum(is.na(x))/nrow(data_matrix))
> nas1b <- rowMeans(is.na(data_matrix))
> nas1a
[1] 0.1428571 0.0000000 0.0000000 0.7142857 0.0000000 0.2857143 0.7142857
> nas1b
[1] 0.2 0.0 0.0 1.0 0.0 0.4 1.0
--
View this message in context:
http://www.nabble.com/NA-values-trimming-tp24339399p24351956.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
