A004175 Triangle of coefficients of Euler polynomials 2^n*E_n(x) (exponents in decreasing order).

1, 2, -1, 4, -4, 0, 8, -12, 0, 2, 16, -32, 0, 16, 0, 32, -80, 0, 80, 0, -16, 64, -192, 0, 320, 0, -192, 0, 128, -448, 0, 1120, 0, -1344, 0, 272, 256, -1024, 0, 3584, 0, -7168, 0, 4352, 0, 512, -2304, 0, 10752, 0, -32256, 0, 39168, 0, -7936, 1024

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• tabl
• nice
• easy

References

• M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 809.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..1000
• M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].

Programs

Mathematica

Flatten[Table[2^n*Reverse@CoefficientList[EulerE[n,x], x],{n,0,10}]][[1;;56]] (* Jean-François Alcover, Apr 29 2011 *)