|
%I #12 Sep 08 2022 08:44:44
%S 1,0,0,0,2,11,62,392,2862,23714,220204,2264965,25561751,314044378,
%T 4172303889,59604341272,911094930876,14837831731419,256482519928831,
%U 4689966078698628,90449345803473558,1834829586299035048
%N a(n) = floor( Gamma(n+2/7)/Gamma(2/7) ).
%H G. C. Greubel, <a href="/A020078/b020078.txt">Table of n, a(n) for n = 0..445</a>
%p Digits := 64:f := proc(n,x) trunc(GAMMA(n+x)/GAMMA(x)); end;
%p seq(floor(pochhammer(2/7,n)), n = 0..25); # _G. C. Greubel_, Nov 17 2019
%t Floor[Pochhammer[2/7, Range[0, 25]]] (* _G. C. Greubel_, Nov 17 2019 *)
%o (PARI) vector(26, n, my(x=2/7); gamma(n-1+x)\gamma(x) ) \\ _G. C. Greubel_, Nov 17 2019
%o (Magma) [Floor(Gamma(n+2/7)/Gamma(2/7)): n in [0..25]]; // _G. C. Greubel_, Nov 17 2019
%o (Sage) [floor(rising_factorial(2/7, n)) for n in (0..25)] # _G. C. Greubel_, Nov 17 2019
%Y Cf. A220605.
%Y Cf. A020074, A020075, A020076, A020077, A020079.
%K nonn
%O 0,5
%A _Simon Plouffe_
|
