Actually, I guess I'm not really talking about objects. I was looking through the scoping demo. It uses this function.
> open.account <- function(total) { + + list( + deposit = function(amount) { + if(amount <= 0) + stop("Deposits must be positive!\n") + total <<- total + amount + cat(amount,"deposited. Your balance is", total, "\n\n") + }, + withdraw = function(amount) { + if(amount > total) + stop("You don't have that much money!\n") + total <<- total - amount + cat(amount,"withdrawn. Your balance is", total, "\n\n") + }, + balance = function() { + cat("Your balance is", total, "\n\n") + } + ) + } I wanted to re-write the function so that instead of referring to *total *in *deposit *and *withdraw *I could refer to *balance*. Something like this, withdraw = function(amount) { + if(amount > total) + stop("You don't have that much money!\n") + total <<- total - amount + cat(amount,"withdrawn. Your balance is", *this,balance()*, "\n\n") But that doesn't work. Is it possible to do this? Thanks. *-- Russ Abbott* *_____________________________________________* *** Professor, Computer Science* * California State University, Los Angeles* * Google voice: 747-*999-5105 * blog: *http://russabbott.blogspot.com/ vita: http://sites.google.com/site/russabbott/ *_____________________________________________* On Sat, Mar 19, 2011 at 4:40 PM, Gabor Grothendieck <ggrothendi...@gmail.com > wrote: > On Sat, Mar 19, 2011 at 6:34 PM, Russ Abbott <russ.abb...@gmail.com> > wrote: > > Is it possible to refer to an object from within a method, as in *this > *in > > Java? I can't find anything about this in the documentation. Sorry if I > > missed it. > > > > Assuming you are referring to S3, the first argument to a method is > the object (unless specified otherwise in the UseMethod call but that > is rarely done). > > > -- > Statistics & Software Consulting > GKX Group, GKX Associates Inc. > tel: 1-877-GKX-GROUP > email: ggrothendieck at gmail.com > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.