A020016 Nearest integer to Gamma(n + 7/10)/Gamma(7/10).
1, 1, 1, 3, 12, 56, 318, 2134, 16430, 142945, 1386570, 14836295, 173584650, 2204525052, 30201993206, 443969300123, 6970318011936, 116404310799339, 2060356301148292, 38528662831473069, 759014657780019468
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..449
Programs
-
Magma
[Round(Gamma(n +7/10)/Gamma(7/10)): n in [0..30]]; // G. C. Greubel, Jan 19 2018
-
Maple
Digits := 64:f := proc(n,x) round(GAMMA(n+x)/GAMMA(x)); end;
-
Mathematica
Table[Round[Gamma[n + 7/10]/Gamma[7/10]], {n, 0,50}] (* G. C. Greubel, Jan 19 2018 *)
-
PARI
for(n=0,30, print1(round(gamma(n+7/10)/gamma(7/10)), ", ")) \\ G. C. Greubel, Jan 19 2018
Comments