A020070 a(n) = floor( Gamma(n+7/8)/Gamma(7/8) ).

1, 0, 1, 4, 18, 89, 523, 3598, 28341, 251531, 2483877, 27012163, 320769440, 4129906548, 57302453360, 852373993744, 13531437150692, 228343001917931, 4081631159283027, 77040788131467135, 1531185664112909314

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

Mathematica

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

Prog

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

Crossrefs

Cf. A020071, A020072, A020073.

Sequence in context: A129323 A000305 A200029 * A197650 A036749 A218760

Adjacent sequences: A020067 A020068 A020069 * A020071 A020072 A020073

Keyword

nonn

Author

Simon Plouffe

Status

approved