A020074 a(n) = floor( Gamma(n+6/7)/Gamma(6/7) ).

1, 0, 1, 4, 17, 85, 499, 3422, 26888, 238157, 2347553, 25487720, 302211542, 3885576978, 53842995267, 799953072548, 12684970150410, 213832353964066, 3818434892215473, 72004772253206072, 1429809049027949159

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(6/7, n)), n = 0..25); # G. C. Greubel, Nov 17 2019

Mathematica

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

Prog

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

Crossrefs

Cf. A220607.

Cf. A020075, A020076, A020077, A020078, A020079.

Sequence in context: A087316 A104979 A081052 * A163071 A321384 A056542

Adjacent sequences: A020071 A020072 A020073 * A020075 A020076 A020077

Keyword

nonn

Author

Simon Plouffe

Status

approved