OFFSET
0,2
COMMENTS
MAPLE
a := n -> (-1)^iquo(n, 2)*euler(n)*(n+1)/(4^(n+1)-2^(n+1));
seq(numer(a(2*n)), n=0..13);
CROSSREFS
KEYWORD
frac,nonn
AUTHOR
Peter Luschny, May 03 2009
STATUS
approved