R/misc.R

In DescrTab2: Publication Quality Descriptive Statistics Tables

Defines functions write_in_tmpfile_for_cran

Documented in write_in_tmpfile_for_cran

#' Function that returns true in CRAN submission
#'
#' @return TRUE for CRAN submission, FALSE otherwise
write_in_tmpfile_for_cran <- function() {
  if (identical(Sys.getenv("NOT_CRAN"), "true")) {
    return(invisible(FALSE))
  } else {
    TRUE
  }
}

Try the DescrTab2 package in your browser