[R] How to get the function names

From: Søren Højsgaard <Soren.Hojsgaard_at_agrsci.dk>
Date: Thu 05 Oct 2006 - 20:41:05 GMT


I've defined the function  

getFunNames <- function(FUN){
  if (!is.list(FUN))
    fun.names <- paste(deparse(substitute(FUN)), collapse = " ")   else
    fun.names <- unlist(lapply(substitute(FUN)[-1], function(a) paste(a)))   fun.names
}

which gives what I want :
> getFunNames(mean)

[1] "mean"
> getFunNames(ff)

[1] "ff"
> getFunNames(c(mean,ff))

[1] "mean" "ff"  

If I call this within a function, things go wrong: 1] "FUN"
> foo(ff)

[1] "FUN"
> foo(c(mean,ff))

Error in substitute(FUN)[-1] : object is not subsettable

Obviously there are some things (quite a few things) which I have not understood. Can anyone help? Thanks
Søren



R-help@stat.math.ethz.ch 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. Received on Fri Oct 06 06:44:26 2006

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.1.8, at Thu 05 Oct 2006 - 23:30:08 GMT.

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