OFFSET
1,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..390 (terms 1..100 from Harry J. Smith)
MATHEMATICA
Table[Floor[Gamma[n/4]*Gamma[n+1]/4], {n, 50}] (* G. C. Greubel, Jan 15 2018 *)
PROG
(PARI) for(n=1, 20, print1(floor(gamma(n/4)*(gamma(n+1)/4)), ", "))
(PARI) { default(realprecision, 300); for (n=1, 100, write("b062512.txt", n, " ", (gamma(n/4)*(gamma(n + 1))\4)) ) } \\ Harry J. Smith, Aug 08 2009
(Magma) [Floor(Gamma(n/4)*Gamma(n + 1)/4): n in [1..30]]; // G. C. Greubel, Jan 15 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jun 24 2001
EXTENSIONS
Terms corrected by Harry J. Smith, Aug 08 2009
STATUS
approved