using character to definition of input function in r

Question

I want to write a function. However, the assumption is that I don't know the input arguments of the function. I just have a character vector to define input arguments of the function. Consider the following code:

f <- expression(exp(-d^2/s^2) )
fx <- function(d, s){ eval( f[[1]] ) }

In the above code, I know the parameters of expression and easily define a calculative function for it. But I get the expression from the user and I don't know what are the parameters. So, I want something like this:

f <- expression(exp(-d^2/s^2) )
v = all.vars(f)
#"d" "s"
fx <- function(?){ eval( f[[1]] ) }

I want to convert v to d and s on input function instead of ?. Is there any way?

It gives me an error.

mohammad
– mohammad

2019-10-22 22:32:50 +00:00
Commented Oct 22, 2019 at 22:32 — mohammad
– mohammad, Commented Oct 22, 2019 at 22:32

joran · Accepted Answer · 2019-10-22 22:35:39Z

3

There are a few ways to construct functions programmatically, one being:

body <- quote(exp(-d^2/s^2))
arg_names <- all.vars(body)
args <- setNames(rep(NA,length(arg_names)),all.vars(body))
fx <- as.function(c(args,body))

>   fx(1,1)
[1] 0.3678794

answered Oct 22, 2019 at 22:35

joran

175k34 gold badges439 silver badges485 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

mohammad Over a year ago

Thanks. It is amazing.

Collectives™ on Stack Overflow

using character to definition of input function in r

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related