Oh wow.
Post of the year!
Where's the like button?
Note, I was able to rewrite it without the deprecated args.
(Don't want one of those CRAN emails, in 12 months from now, saying
please change XXXX).
I'll have to come back to this later, to see if I can get the body of
f() to access the slot
On Mon, Feb 22, 2021 at 11:36 AM Hervé Pagès <hpages.on.git...@gmail.com> wrote:
>
> Hi Abby,
>
> Something along the line of:
>
> setClass("S4Function",
> contains="function",
> representation(name="character", more_stuff="ANY")
> )
>
> seems to do what you want:
>
> f <- new("S4Function", function(a) a^2, name="square")
>
> # 'f' is both an S4 object and a function:
> is.object(f)
> # [1] TRUE
> is.function(f)
> # [1] TRUE
>
> f@name
> # [1] "square"
> f(11)
> # [1] 121
>
> Hope this helps,
>
> H.
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.
