R/zzz.r

Defines functions .onAttach scglmmr_message

# source: https://github.com/MattPM/scglmmr
# author: Matt Mulè
# email: mattmule@gmail.com

scglmmr_message <- function()
{
  mesg <-c(paste0(
" loaded package 'scglmmr' "
))
  return(mesg)
}

.onAttach <- function(lib, pkg)
{
  # startup message
  msg <- scglmmr_message()
  if(!interactive())
    msg[1] <- paste("https://github.com/MattPM/scglmmr")
  packageStartupMessage(msg)
  invisible()
}
MattPM/scglmmr documentation built on April 26, 2024, 12:55 a.m.