A109272 Floor of expansion (1+e*x)^Pi.

1, 8, 24, 25, 2, -2, 0, -2, 1, -3, 3, -6, 9, -19, 35, -70, 140, -289, 603, -1283, 2763, -6031, 13307, -29660, 66710, -151297, 345755, -795695, 1842994, -4294316, 10061643, -23696379, 56076739, -133301692, 318212959, -762636889, 1834568152, -4428667929, 10726314536, -26060812015, 63505805734

Offset: 1

Author

Zak Seidov, Jun 24 2005

Keywords

• sign

Comments

Cf. A109271.

Crossrefs

Cf. A109271.

Programs

Mathematica

ns=Normal[With[{m=50}, s=Series[(1+E x)^Pi, {x, 0, m}]]]; A109272=Floor[ CoefficientList[ns, x]]