|
|
A020088
|
|
a(n) = floor(Gamma(n + 2/3)/Gamma(2/3)).
|
|
2
|
|
|
1, 0, 1, 2, 10, 50, 287, 1915, 14684, 127262, 1230201, 13122149, 153091744, 1939162100, 26501882045, 388694270000, 6089543563340, 101492392722342, 1793032271428052, 33469935733323641, 658242069422031618
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
MAPLE
|
Digits:= 64: x:=2/3: f := proc(n, x) trunc(GAMMA(n+x)/GAMMA(x)); end;
seq(floor(pochhammer(2/3, n)), n = 0..30); # G. C. Greubel, Nov 30 2019
|
|
MATHEMATICA
|
Table[Floor[Pochhammer[2/3, n]], {n, 0, 30}] (* G. C. Greubel, Nov 19 2018 *)
|
|
PROG
|
(PARI) x=2/3; vector(30, n, gamma(n-1+x)\gamma(x) ) \\ G. C. Greubel, Nov 19 2018
(Magma) [Truncate(Gamma(n + 2/3)/Gamma(2/3)): n in [0..30]]; // G. C. Greubel, Nov 19 2018
(Sage) [int(gamma(n + 2/3)/gamma(2/3)) for n in range(30)] # G. C. Greubel, Nov 19 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|