Skip to content

Calling an R Exit Function

3 messages · PhilRack, Sarah Goslee, Phil Rack

#
I'm looking for advice and suggestions on how I might be able to implement a
routine when R exits. First, I'm running on Windows XP SP2 using R 2.7.1. I
have a series of R programs that run numerous times a day. At the end of
each program, I have a call that appends a line of text to another file --
called completed.txt. for example,

cat("File Completed - WPS2R1 \n",file = "D:\\WPSWork\\WPS Temporary
Data\\_TD4216\\completed.txt ",append=TRUE)

I place this at the very end of my programs and this works fine if the
program doesn't terminate abnormally for some reason.

What I would like to do is whenever R runs my jobs, I would like to have
that line above execute whether the program runs to completion successfully
or not. Basically, I want to have the ability to invoke some type of exit
procedure that I can call to execute the above R statement. Honestly, I'm
confused on how to implement such a thing and how onSessionExit() might work
or if this is even the function I want to be calling.

Any suggestions are welcome.

Thanks,

Phil Rack
www.MineQuest.com
#
What about .Last() ?
You can implement a system-wide version - I'm
assuming that is possible on Windows.

Sarah
On Sat, Dec 20, 2008 at 8:52 AM, PhilRack <philrack at minequest.com> wrote:
#
Thank You Sarah! With your help, I was able to use the .Last function along
with

options (error = .Last)

to get what I wanted. So basically the new code that I need to add to my
process looks like:


.Last <- function() 
  { 
     cat("File Completed - WPS2R1 \n",file = "D:\\WPSWork\\WPS Temporary
Data\\_TD7204\\WPS2R.sem ",append=TRUE) 
  }

options (error = .Last)




Philip Rack
MineQuest, LLC
SAS & WPS Consulting and WPS Reseller
Tel: (614) 457-3714
Web: www.MineQuest.com
Blog: www.MineQuest.com/WordPress


-----Original Message-----
From: Sarah Goslee [mailto:sarah.goslee at gmail.com] 
Sent: 12/20/2008 9:40 AM
To: PhilRack
Cc: r-help at r-project.org
Subject: Re: [R] Calling an R Exit Function

What about .Last() ?
You can implement a system-wide version - I'm
assuming that is possible on Windows.

Sarah
On Sat, Dec 20, 2008 at 8:52 AM, PhilRack <philrack at minequest.com> wrote:
a
2.7.1.[...]