R/zzz.R

In langenberg/subgroupsem: Subgroup Discovery in Structural Equation Models

.onLoad <- function(libname, pkgname) {
    # Welcome message to be friendly
    version <- read.dcf(
        file = system.file("DESCRIPTION", package = pkgname),
        fields = "Version"
    )
    packageStartupMessage("This is ", paste(pkgname, version))
    packageStartupMessage(pkgname, " is BETA software! Please report any bugs.")
}