R中的正则化2F1超几何

Question

在Mathematica中有一个函数来计算超几何2F1（）函数。例如，在数学两种计算如下：

in: Hypergeometric2F1Regularized[15, 8, 10, -0.651542] 
out: 7.86105*10^-9 
in: Hypergeometric2F1Regularized[31, 13, 18, -2.651542] 
out: 5.04779*10^-26 

在RI尝试以下等价的，但结果并不类似上面：

library("BAS") 
> hypergeometric2F1(15, 8 ,10, -0.651542,log=F) 
[1] 2.441767e-05 
> hypergeometric2F1(31, 13, 18, -2.651542,log=F) 
[1] Inf 
Warning message: 
In hypergeometric2F1(31, 13, 18, -2.651542, log = F) : 
    integral in 2F1 diverges 

我想知道什么是Mathematica的Hypergeometric2F1Regularized [完全等效]功能R.

感谢

Answer 1

hypergeometric2F1(15, 8, 10, -0.651542, log = FALSE)/factorial(10 - 1) 
[1] 7.861054e-09 

BEC因为正规版本是2F1(a,b,c;z)/Gamma(c)。