OFFSET
0,4
COMMENTS
Denominators are in A244084.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..100
MATHEMATICA
Join[{1}, Table[Numerator[n^n/(2 n)!], {n, 1, 30}]]
PROG
(Magma) [Numerator(n^n/Factorial(2*n)): n in [0..30]];
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Vincenzo Librandi, Jun 20 2014
STATUS
approved