R-alpha: sys.xxx

Luke Tierney (luke@stat.umn.edu)
Fri, 24 May 1996 12:03:48 -0500 (CDT)


From: Luke Tierney <luke@stat.umn.edu>
Message-Id: <9605241703.AA16196@nokomis.stat.umn.edu>
Subject: R-alpha: sys.xxx
To: r-testers@stat.math.ethz.ch
Date: Fri, 24 May 1996 12:03:48 -0500 (CDT)

I'm trying to get a bit on a handle on how some of the sys.xxx
functions work and interact with eval. Here is a small difference I
found between Splus and R:

-------------------------------------------------------------------------------
R : Copyright (c) 1996, Robert Gentleman and Ross Ihaka
Version 0.6, (Released: May 17, 1996)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type "license()" for details.

> f<-function(x){ eval(expression(x),sys.frame()) }
> x<-1
> f(2)
[1] 1
> 
-------------------------------------------------------------------------------
S-PLUS : Copyright (c) 1988, 1995 MathSoft, Inc.
S : Copyright AT&T.
Version 3.3 Release 1 for HP Series 700, HP-UX 9.x : 1995 
Working data will be in /NOKOMIS/users/luke/.Data 
> f<-function(x){ eval(expression(x),sys.frame()) }
> x<-1
> f(2)
[1] 2
-------------------------------------------------------------------------------

luke
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-testers mailing list -- To (un)subscribe, send
subscribe	or	unsubscribe
(in the "body", not the subject !)  To: r-testers-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-