|
|
A020065
|
|
Integer part of Gamma(n+7/9)/Gamma(7/9).
|
|
7
|
|
|
1, 0, 1, 3, 14, 69, 400, 2714, 21115, 185345, 1812263, 19532170, 230045568, 2939471157, 40499380396, 598490843642, 9442855533026, 158430131720783, 2816535675036146, 52888281009012092, 1046012668844905826
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
MAPLE
|
Digits := 64:f := proc(n, x) trunc(GAMMA(n+x)/GAMMA(x)); end;
seq(trunc(pochhammer(7/9, n)), n = 0..20); # G. C. Greubel, Nov 13 2019
|
|
MATHEMATICA
|
IntegerPart[Pochhammer[7/9, Range[0, 20]]] (* G. C. Greubel, Nov 13 2019 *)
|
|
PROG
|
(PARI) P(n, x) = gamma(x+n)/gamma(x);
vector(21, n, truncate(P(n-1, 7/9)) ) \\ G. C. Greubel, Nov 13 2019
(Magma) [Truncate(Gamma(n+7/9)/Gamma(7/9)): n in [0..20]]; // G. C. Greubel, Nov 13 2019
(Sage) [int(rising_factorial(7/9, n)) for n in (0..20)] # G. C. Greubel, Nov 13 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|