R/zzz.R

Defines functions .onAttach

.onAttach <- function(...) {
    os <- oblique()
    n <- nchar(os)
    filler <- paste(rep("#", n), collapse = "")
    os <- paste("\n\t", filler, "\n\t", os, "\n\t", filler, "\n")
    packageStartupMessage(os)
}
cszang/oblique documentation built on May 14, 2019, 12:27 p.m.