A020079 a(n) = floor( Gamma(n+1/7)/Gamma(1/7) ).

1, 0, 0, 0, 1, 4, 23, 143, 1027, 8370, 76527, 776207, 8649165, 105025575, 1380336141, 19521896861, 295617295326, 4772107767405, 81807561726950, 1484222905617529, 28412267050392705, 572304236300767347

Offset

0,6

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

Mathematica

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

Prog

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

Crossrefs

Cf. A020074, A020075, A020076, A020077, A020078.

Sequence in context: A091642 A162561 A277921 * A367043 A357152 A146964

Adjacent sequences: A020076 A020077 A020078 * A020080 A020081 A020082

Keyword

nonn

Author

Simon Plouffe

Status

approved