R:字符串的数学函数表达式

R:字符串的数学函数表达式,r,R,我想使用R中“AdapSamp”包中的rARS()函数,以便从几个未规范化的desity函数中进行采样。但是,rARS(n,formula,min=-Inf,max=Inf,sp)中的公式必须是字符串/字符的形式,例如“exp(-(x-2)^2/(2*4))”但我有几个形式的函数,例如。 density不太清楚,但也许这就是你想要的: > f <- function(x){ exp(-(x-2)^2/(2*4)) } > as.character(body(f))[2] [1]

我想使用R中“AdapSamp”包中的
rARS()
函数,以便从几个未规范化的desity函数中进行采样。但是,
rARS(n,formula,min=-Inf,max=Inf,sp)
中的公式必须是字符串/字符的形式,例如
“exp(-(x-2)^2/(2*4))”
但我有几个形式的函数,例如。
density不太清楚,但也许这就是你想要的:

> f <- function(x){ exp(-(x-2)^2/(2*4)) }
> as.character(body(f))[2]
[1] "exp(-(x - 2)^2/(2 * 4))"
>f as.character(body(f))[2]
[1] “exp(-(x-2)^2/(2*4))”

请使用
dput
提供您的输入。谢谢!这在一定程度上有帮助,这就是我所说的像deparse(f)[3]一样使用deparse的意思。无论如何,欢迎进一步的解决方案@K.O.T.这提供了您要求的字符串,那么您为什么需要进一步的解决方案?为什么它“部分”有帮助?我认为你应该更清楚你的期望。