R/zzz.R

Defines functions is_attached .onAttach

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

    crayon::num_colors(TRUE)
    healthyverse_attach()

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

}

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

Try the healthyverse package in your browser

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

healthyverse documentation built on April 18, 2023, 5:11 p.m.