OFFSET
0,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..445
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