A020077 a(n) = floor( Gamma(n+3/7)/Gamma(3/7) ).

1, 0, 0, 1, 5, 22, 122, 787, 5852, 49330, 465112, 4850460, 55433829, 688963306, 9251792972, 133490155743, 2059562402902, 33835668047686, 589707357402530, 10867464157846629, 211139303638163096, 4313274345751046120

Offset: 0

Author

Simon Plouffe

Keywords

• nonn

Links

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

Crossrefs

Cf. A220608.

Cf. A020074, A020075, A020076, A020078, A020079.

Programs

Magma

[Floor(Gamma(n+3/7)/Gamma(3/7)): n in [0..25]]; // G. C. Greubel, Nov 17 2019

Maple

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

Mathematica

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

PARI

vector(26, n, my(x=3/7); gamma(n-1+x)\gamma(x) ) \\ G. C. Greubel, Nov 17 2019

Sage

[floor(rising_factorial(3/7, n)) for n in (0..25)] # G. C. Greubel, Nov 17 2019