A020076 a(n) = floor( Gamma(n+4/7)/Gamma(4/7) ).

1, 0, 0, 2, 8, 37, 210, 1380, 10450, 89574, 857351, 9063434, 104876887, 1318452295, 17893281147, 260730668150, 4059948975490, 67279154450985, 1182190856781603, 21954973054515489, 429690186924088870

Offset

0,4

Links

G. C. Greubel, Table of n, a(n) for n = 0..445

Maple

Digits := 64:f := proc(n, x) trunc(GAMMA(n+x)/GAMMA(x)); end;
seq(floor(pochhammer(4/7, n)), n = 0..25); # G. C. Greubel, Nov 17 2019

Mathematica

Floor[Pochhammer[4/7, Range[0, 25]]] (* G. C. Greubel, Nov 17 2019 *)

Prog

(PARI) vector(26, n, my(x=4/7); gamma(n-1+x)\gamma(x) ) \\ G. C. Greubel, Nov 17 2019
(Magma) [Floor(Gamma(n+4/7)/Gamma(4/7)): n in [0..25]]; // G. C. Greubel, Nov 17 2019
(Sage) [floor(rising_factorial(4/7, n)) for n in (0..25)] # G. C. Greubel, Nov 17 2019

Crossrefs

Cf. A220609.

Cf. A020074, A020075, A020077, A020078, A020079.

Sequence in context: A007857 A289541 A047729 * A342052 A317873 A289316

Adjacent sequences: A020073 A020074 A020075 * A020077 A020078 A020079

Keyword

nonn

Author

Simon Plouffe

Status

approved