OFFSET
0,5
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..449
MAPLE
Digits:= 64: x:=1/2: f:= proc(n, x) trunc(GAMMA(n+x)/GAMMA(x)); end;
MATHEMATICA
Table[IntegerPart[Pochhammer[1/2, n]], {n, 0, 30}] (* G. C. Greubel, Nov 19 2018 *)
PROG
(PARI) default(realprecision, 100); for(n=0, 30, print1(truncate( gamma(n+1/2)/gamma(1/2)), ", ")) \\ G. C. Greubel, Nov 19 2018
(Magma) [Truncate(Gamma(n + 1/2)/Gamma(1/2)): n in [0..30]]; // G. C. Greubel, Nov 19 2018
(Sage) [int(gamma(n + 1/2)/gamma(1/2)) for n in range(30)] # G. C. Greubel, Nov 19 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved