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解决了我的问题。