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

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

Offset

0,3

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

T. D. Noe, Rows n = 0..50 of triangle, flattened

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].

Eric Weisstein's World of Mathematics, Euler Polynomial.

Mathematica

Flatten[ Table[ CoefficientList[ 2^n*EulerE[n, x], x], {n, 0, 10}]] (* Jean-François Alcover, Jul 21 2011 *)

Crossrefs

Cf. A099932.

Sequence in context: A114122 A319934 A219836 * A348874 A300328 A365382

Adjacent sequences: A004171 A004172 A004173 * A004175 A004176 A004177

Keyword

sign,tabl,nice

Author

N. J. A. Sloane

Status

approved