R/is_r_startup.R

#' Check if R is in the startup sequence.
#' 
#' @export
is_r_startup<- function(){
    root <- sys.call(1)
    !is.null(root) && (deparse(root) == ".First.sys()")
}

Try the wingui package in your browser

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

wingui documentation built on May 1, 2019, 9:23 p.m.