Statistics/Chi-squared distribution: Difference between revisions
→{{header|Julia}}: gamma
m (gamma) |
(→{{header|Julia}}: gamma) |
||
Line 82:
""" gamma function to 7 places """
function gamma(
p = [ 0.99999999999980993, 676.5203681218851, -1259.1392167224028,
771.32342877765313, -176.61502916214059, 12.507343278686905,
-0.13857109526572012, 9.9843695780195716e-6, 1.5056327351493116e-7 ]
if x < 0.5
return π / (sinpi(x) * gamma(1.0 - x))
| |||