| addLast {fame} | R Documentation |
Add a function to be executed when R exits.
addLast(fun)
fun |
Function to be called. |
addLast defines .Last (if not already present) or redefines it
so that the function fun will be called when R exits. The
latter is accomplished by saving the current definition of .Last and
creating a new .Last function that calls fun and then the
original .Last function.
None.
Gregory R. Warnes gregory.r.warnes@pfizer.com
## Not run:
## Print a couple of cute messages when R exits.
helloWorld <- function() cat("\nHello World!\n")
byeWorld <- function() cat("\nGoodbye World!\n")
addLast(byeWorld)
addLast(helloWorld)
q("no")
## Should yield:
##
## Save workspace image? [y/n/c]: n
##
## Hello World!
##
## Goodbye World!
##
## Process R finished at Tue Nov 22 10:28:55 2005
## Unix-flavour example: send Rplots.ps to printer on exit.
myLast <- function()
{
cat("Now sending PostScript graphics to the printer:\n")
system("lpr Rplots.ps")
cat("bye bye...\n")
}
addLast(myLast)
quit("yes")
## Should yield:
##
## Now sending PostScript graphics to the printer:
## lpr: job 1341 queued
## bye bye...
##
## Process R finished at Tue Nov 22 10:28:55 2005
## End(Not run)