R/zzz.R

In tidymass/tinytools: All the usefull tools for MS data processing and analysis

.onAttach <- function(...) {
    needed <- core[!is_attached(core)]
    if (length(needed) == 0) {
          return()
      }

    crayon::num_colors(TRUE)
    tinytools_attach()

    if (!"package:conflicted" %in% search()) {
        x <- tinytools_conflicts()
        msg(tinytools_conflict_message(x), startup = TRUE)
    }
}

is_attached <- function(x) {
    paste0("package:", x) %in% search()
}