R/ismdi.R

Defines functions ismdi

# this function by Uwe Ligges; used with permission

ismdi <- function(){
    return(mdi = as.logical(.C("ismodemdi", as.integer(0), PACKAGE = "Rcmdr2")[[1]]))
}

Try the Rcmdr2 package in your browser

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

Rcmdr2 documentation built on May 2, 2019, 6:49 p.m.