folders/anRpackage/R/anRpackage-internal.R

In bwtian/Rtemplate: What the package does (short line)

.First <-
function() {
            cat("Current R.version is:", as.character(getRversion()), "\n")
            cat("Current R.repos is:", getOption("repos"), "\n")
            cat("Current R.Library is:", .libPaths(), "\n")
            cat("Current R.Workdir is:", getwd(), "\n")
            cat("\nSuccessfully loaded .Rprofile at:", date(), "\n")
            if (file.exists(".RData")) load(file=".RData")
}
.Last <-
function() {
  # save command history here? ask=graphics
  #update.packages(ask= FALSE)
  #timestamp(,prefix=paste("##------ [",getwd(),"] ",sep=""))
  #try(savehistory("~/.Rhistory"))
        cat("\nGoodbye at ", date(), "\n")
}