inst/Rprofile.d/interactive=TRUE/package=fortunes,when=daily.R

try(local({
  f <- suppressWarnings(fortunes::fortune())
  cat(sprintf("Fortune #%s:\n", attr(f, "row.names")))
  print(f)
  unloadNamespace("fortunes")
}), silent = TRUE)
HenrikBengtsson/startup documentation built on Dec. 10, 2024, 12:15 p.m.