|
|
A020020
|
|
Nearest integer to Gamma(n + 7/9)/Gamma(7/9).
|
|
2
|
|
|
1, 1, 1, 4, 15, 69, 401, 2715, 21115, 185345, 1812263, 19532171, 230045569, 2939471158, 40499380397, 598490843643, 9442855533027, 158430131720783, 2816535675036147, 52888281009012092, 1046012668844905826
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
Gamma(n + 7/9)/Gamma(7/9) = 1, 7/9, 112/81, 2800/729, 95200/6561, 4093600/59049, 212867200/531441, 12984899200/4782969, ... - R. J. Mathar, Sep 04 2016
|
|
LINKS
|
|
|
MAPLE
|
Digits := 64:f := proc(n, x) round(GAMMA(n+x)/GAMMA(x)); end;
|
|
MATHEMATICA
|
Table[Round[Gamma[n + 7/9]/Gamma[7/9]], {n, 0, 50}] (* G. C. Greubel, Feb 03 2018 *)
|
|
PROG
|
(PARI) for(n=0, 30, print1(round(gamma(n+7/9)/gamma(7/9)), ", ")) \\ G. C. Greubel, Feb 03 2018
(Magma) [Round(Gamma(n +7/9)/Gamma(7/9)): n in [0..30]]; // G. C. Greubel, Feb 03 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|