如何为 R 包创建自定义启动消息?

Len*_*ger 6 r package cran

例如,如果我加载 R 包“mclust”,我会看到

> library(mclust)
    __  ___________    __  _____________
   /  |/  / ____/ /   / / / / ___/_  __/
  / /|_/ / /   / /   / / / /\__ \ / /   
 / /  / / /___/ /___/ /_/ /___/ // /    
/_/  /_/\____/_____/\____//____//_/    version 5.4.7
Type 'citation("mclust")' for citing this R package in publications.
Run Code Online (Sandbox Code Playgroud)

当我自己构建 R 包时,如何创建这样的自定义启动消息?

编辑:要明确的是,我不是问如何创建 ASCII 艺术,而是问如何显示一般的启动消息。

use*_*330 9

你的问题并不完全清楚。您是否询问如何创建显示 MCLUST 的 ASCII 艺术,或者如何显示启动消息?我假设是后者。

你添加一个像这样的函数

.onAttach <- function(libname, pkgname) {
  packageStartupMessage("This is version ", packageVersion(pkgname), 
                        " of ", pkgname)
}
Run Code Online (Sandbox Code Playgroud)

在你的包代码中的某个地方。按照惯例,您可以将其放入名为 的文件中R/zzz.R,但它可以放在 R 代码中的任何位置。

不要打印除错误或警告之外的内容.onLoad();通常应该保持沉默。