Re: [Rd] S4 Slot assignment within function

From: Duncan Murdoch <murdoch.duncan_at_gmail.com>
Date: Sat, 04 Jun 2011 07:26:08 -0400

On 11-06-03 5:03 PM, mcguirebc wrote:
> Is there a simple way to assign values to S4 slots from within a function?
>
> Doing this doesn't work:
>
>> assign_slot<-function(x){
>
> assign("OBJECT_at_slot",x,envir=parent.env(environment())
>
> }
>
>> assign_slot(x)
>
> All I get from this is a new object with the name OBJECT_at_slot, the slot
> assignment of OBJECT doesn't change.
>
> I have thought about solutions such as eval(parse()) to pull this off, but
> would prefer not to ugly up the code.
>
> Thoughts??
>
> I have searched rather thoroughly, but it is possible I overlooked
> something. If I did, apologies.

I haven't tried this, but I would expect

OBJECT_at_slot <<- x

to work, assuming OBJECT already exists somewhere outside the function but in its environment.

Duncan Murdoch



R-devel_at_r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel Received on Sat 04 Jun 2011 - 11:33:48 GMT

This quarter's messages: by month, or sorted: [ by date ] [ by thread ] [ by subject ] [ by author ]

All messages

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Sat 04 Jun 2011 - 12:40:16 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-devel. Please read the posting guide before posting to the list.

list of date sections of archive