|
%I #13 Jun 22 2018 04:41:03
%S 1,1,2,4,15,70,401,2715,21116,185346,1812264,19532171,230045569,
%T 2939471158,40499380397,598490843643,9442855533027,158430131720784,
%U 2816535675036147,52888281009012093,1046012668844905827
%N Ceiling of Gamma(n + 7/9)/Gamma(7/9).
%p Digits := 64:f := proc(n,x) ceil(GAMMA(n+x)/GAMMA(x)); end;
%t Table[Ceiling[Gamma[n + 7/9]/Gamma[7/9]], {n, 0, 29}] (* _Alonso del Arte_, Jun 17 2018 *)
%o (PARI) a(n) = ceil(gamma(n + 7/9)/gamma(7/9)); \\ _Michel Marcus_, Jun 21 2018
%K nonn
%O 0,3
%A _Simon Plouffe_
|
