R/utils.R

In screenshot: Take Screenshots (Screen Capture) from R Command

Defines functions get_os

Documented in get_os

#' Get OS name
#' 
#' @return  A string of OS name
#' @examples
#' get_os()
#' 
#' @export
get_os <- function(){
  switch(Sys.info()["sysname"],
    "Windows" = "win",
     "Linux"  = "linux",
                "mac"
  )
}

Try the screenshot package in your browser