Statistics/Chi-squared distribution: Difference between revisions

Content added Content deleted
m (sp)
m (delete unneeded)
Line 100: Line 100:
z, biga, bigx = BigFloat(), BigFloat(a), BigFloat(x)
z, biga, bigx = BigFloat(), BigFloat(a), BigFloat(x)
ccall((:mpfr_gamma_inc, :libmpfr), Int32, (Ref{BigFloat}, Ref{BigFloat}, Ref{BigFloat}, Int32), z, biga, bigx, 0)
ccall((:mpfr_gamma_inc, :libmpfr), Int32, (Ref{BigFloat}, Ref{BigFloat}, Ref{BigFloat}, Int32), z, biga, bigx, 0)
q = z/gamma(a)
return Float64(1 - z / gamma(a))
return Float64(1 - z / gamma(a))
end
end