OFFSET
0,2
EXAMPLE
e(0,x) = 1,
e(1,x) = 2*x^1 - 1,
e(2,x) = x^2 - x^1,
e(3,x) = 4*x^3 - 6*x^2 + 1,
e(4,x) = x^4 - 2*x^3 + x^1,
e(5,x) = 2*x^5 - 5*x^4 + 5*x^2 - 1.
MAPLE
seq(seq(coeff(2^padic[ordp](i+1, 2)*euler(i, x), x, i-j), j=0..i), i=0..11);
MATHEMATICA
Table[ CoefficientList[ EulerE[n, x]*2^IntegerExponent[n+1, 2], x] // Reverse, {n, 0, 11}] // Flatten (* Jean-François Alcover, May 21 2013 *)
CROSSREFS
KEYWORD
sign,tabl
AUTHOR
Peter Luschny, Jun 16 2012
STATUS
approved