R/ismdi.R

Defines functions ismdi

# last modified 2016-02-22 by J. Fox

ismdi <- function(){
  if (!WindowsP()) return(NA)
  !is.null(utils::getWindowsHandle("Frame"))
}

Try the Rcmdr package in your browser

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

Rcmdr documentation built on Sept. 28, 2023, 5:08 p.m.