factbygama.m

来自「关于特殊函数计算的的源代码」· M 代码 · 共 11 行

function y = factbygama(n)
format long;
y = 1;
if n <= 32 
    for i=1:n
        y = y*i;
    end
else
    y = exp(lngama(n+1));
end