R/aaa.R

In gisler/DTSg: A Class for Working with Time Series Data Based on 'data.table' and 'R6' with Largely Optional Reference Semantics

#' @import checkmate
#' @import data.table
#' @import methods
#' @import R6
NULL

.onLoad <- function(libname, pkgname) {
  suppressWarnings(onCRAN <- isTRUE(as.logical(as.numeric( # nolint
    Sys.getenv("_R_CHECK_EXAMPLE_TIMING_CPU_TO_ELAPSED_THRESHOLD_")
  ))))
  if (onCRAN) {
    setDTthreads(2L)
  }

  getOption("DTSgClone"             , options(DTSgClone              = TRUE      ))
  getOption("DTSgDeprecatedWarnings", options(DTSgDeprecatedWarnings = TRUE      ))
  getOption("DTSgFast"              , options(DTSgFast               = FALSE     ))
  getOption("DTSgFunbyApproach"     , options(DTSgFunbyApproach      = "base"    ))
  getOption("DTSgNA.status"         , options(DTSgNA.status          = "explicit"))
}