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 June 22, 2024, 6:52 p.m.