login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A020067
Integer part of Gamma(n+4/9)/Gamma(4/9).
7
1, 0, 0, 1, 5, 24, 130, 842, 6274, 52988, 500442, 5226841, 59818300, 744405515, 10008118594, 144561713037, 2232675345794, 36715105686390, 640474621418148, 11813198572823622, 229701083360459334, 4696111037591613052
OFFSET
0,5
LINKS
MAPLE
Digits := 64:f := proc(n, x) trunc(GAMMA(n+x)/GAMMA(x)) end: seq(f(n, 4/9), n=0..25);
# alternative:
seq(trunc(pochhammer(4/9, n)), n = 0..25); # G. C. Greubel, Nov 13 2019
MATHEMATICA
IntegerPart[Pochhammer[4/9, Range[0, 25]]] (* G. C. Greubel, Nov 13 2019 *)
PROG
(PARI) P(n, x) = gamma(x+n)/gamma(x);
vector(26, n, truncate(P(n-1, 4/9)) ) \\ G. C. Greubel, Nov 13 2019
(Magma) [Truncate(Gamma(n+4/9)/Gamma(4/9)): n in [0..25]]; // G. C. Greubel, Nov 13 2019
(Sage) [int(rising_factorial(4/9, n)) for n in (0..25)] # G. C. Greubel, Nov 13 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved