R/check_dim.R

# check dimension
check_dim <- function(bounds)
{
    len <- length(bounds)
    if (len%%2!=0 || len>6){
        stop("invalid bounds input, only vectors with 2, 4, 6 dimension accepted.")
    }
    return(length(bounds)/2)

}
ddlee96/mcmi documentation built on May 15, 2019, 1:52 a.m.