hyperg2F1_vec(-10.34,2.05,3.05,0.1725)
hyperg2F1_vec(30,1,20,.8) # returns about 165.8197
hyperg2F1_vec(30,10,20,0) # returns one
hyperg2F1_vec(10,15,20,-0.1) # returns about 0.4872972
hyperg2F1_vec(c(-10.34, 30, 10), c(2.05, 1, 10), c(3.05, 20, 20),
c(0.1725, 0.8, 0))
hyperg2F1_vec(a=1.2+1:10/10, b=rep(1.4,10), c=rep(1.665,10), z=rep(.3,10))
Run the code above in your browser using DataLab