Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/url/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R中的反函数_R_Inverse - Fatal编程技术网

R中的反函数

R中的反函数,r,inverse,R,Inverse,所以我有一个函数:f(a,b,rho)=r。给定a、b和r,我想找到rho。我在R中遇到了反函数,但是当函数试图查找rho时,函数无法分辨a、b或rho中的哪一个是指定的rho,并且函数无法加载给定的a和b。此外,我知道rho将介于0和1之间 a = -.7 b = 2 r <- function(rho,a,b){ # basically here I defined a very long function of r # in term

所以我有一个函数:
f(a,b,rho)=r
。给定
a
b
r
,我想找到
rho
。我在R中遇到了反函数,但是当函数试图查找
rho
时,函数无法分辨
a
b
rho
中的哪一个是指定的
rho
,并且函数无法加载给定的
a
b
。此外,我知道
rho
将介于0和1之间

a = -.7
b = 2
r <- function(rho,a,b){
            # basically here I defined a very long function of r 
            # in terms of a and b and rho
     }

R_inverse=inverse(function(rho) r(rho,-.7,2),0,1)

# r_value is just a random value
R_inverse(r_value)
a=-.7
b=2

r您在哪里找到了
函数?它不在默认包中。您可以将其视为一维优化问题,请参见
?优化
r
rho
的平滑函数吗?您知道有一个唯一的解决方案吗?您可以使用根查找函数来求解
f(a,b,rho)-r=0
。创建一个函数
g(rho)=f(a,b,rho)-r
,例如,让基本r函数
uniroot
g(rho)=0找到一个解决方案。还有其他一些软件包和函数可以提供帮助。请参阅CRAN任务视图中的数值数学页面。@Bhas谢谢!我使用了uniroot,它解决了我的问题。你在哪里找到了
inverse
函数?它不在默认包中。您可以将其视为一维优化问题,请参见
?优化
r
rho
的平滑函数吗?您知道有一个唯一的解决方案吗?您可以使用根查找函数来求解
f(a,b,rho)-r=0
。创建一个函数
g(rho)=f(a,b,rho)-r
,例如,让基本r函数
uniroot
g(rho)=0找到一个解决方案。还有其他一些软件包和函数可以提供帮助。请参阅CRAN任务视图中的数值数学页面。@Bhas谢谢!我使用uniroot解决了我的问题。