R/stats0.R

Defines functions stats0

Documented in stats0

## File Name: stats0.R
## File Version: 0.05


stats0 <- function(x, FUN, na.rm=TRUE,...)
{
    if ( ! is.vector(x) ){
        sd1 <- apply( x, 2, FUN=FUN, na.rm=na.rm, ...)
    } else {
        sd1 <- FUN( x=x, na.rm=na.rm, ...)
    }
    return(sd1)
}

Try the miceadds package in your browser

Any scripts or data that you put into this service are public.

miceadds documentation built on May 29, 2024, 11:05 a.m.