A020019 Nearest integer to Gamma(n + 8/9)/Gamma(8/9).
1, 1, 2, 5, 19, 92, 543, 3741, 29513, 262341, 2594262, 28248627, 335844793, 4328666215, 60120364101, 895125421053, 14222548356739, 240203038913808, 4296965473902563, 81164903395937306, 1614279745319197539, 33720510235556570814
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..445
Programs
-
Magma
[Round(Gamma(n +8/9)/Gamma(8/9)): n in [0..30]]; // G. C. Greubel, Feb 03 2018
-
Maple
Digits := 64:f := proc(n,x) round(GAMMA(n+x)/GAMMA(x)); end;
-
Mathematica
f[n_] := Round[Gamma[n + 8/9]/Gamma[8/9]]; Array[f, 22, 0] (* Robert G. Wilson v, Sep 13 2013 *)
-
PARI
for(n=0,30, print1(round(gamma(n+8/9)/gamma(8/9)), ", ")) \\ G. C. Greubel, Feb 03 2018
Comments