exclui.na {Kmisc} | R Documentation |
~~ A concise (1-5 lines) description of what the function does. ~~
exclui.na(x)
x |
~~Describe x here~~ |
~~ If necessary, more details than the description above ~~
~Describe the value returned If it is a LIST, use
comp1 |
Description of 'comp1' |
comp2 |
Description of 'comp2' |
...
....
~~further notes~~
~Make other sections like Warning with section{Warning }{....} ~
~~who you are~~
~put references to the literature/web site here ~
~~objects to See Also as help
, ~~~
##---- Should be DIRECTLY executable !! ---- ##-- ==> Define data, use random, ##-- or do help(data=index) for the standard data sets. ## The function is currently defined as function(x) { if (is.null(dim(x))) return(x) il <- which(apply(is.na(x), 1, all)) ic <- which(apply(is.na(x), 2, all)) if (length(il)==nrow(x) | length(ic)==ncol(x)) return(NA) if (length(il)==0) { if (length(ic)==0) return(x) else return(exclui.na(x[, -ic])) } else { if (length(ic)==0) return(exclui.na(x[-il, ])) else return(exclui.na(x[-il, -ic])) } }