|
|
A109271
|
|
Floor of expansion (1+Pi*x)^e.
|
|
2
|
|
|
1, 8, 23, 17, -4, 3, -4, 5, -10, 16, -34, 69, -150, 336, -777, 1833, -4422, 10852, -27053, 68354, -174820, 451966, -1179915, 3107551, -8250149, 22063698, -59402336, 160918012, -438405420, 1200699624, -3304583628, 9136432371, -25367772162, 70715532758, -197863773109, 555569907134
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
[(1+Pi*x)^e=1+e*Pi*x+(1/2)*(e-1)*e*Pi^2*x^2+...=1+8.5*x+23.04*x^2+...=>
(1,8,23...}.
|
|
MATHEMATICA
|
ns=Normal[With[{m=50}, s=Series[(1+Pi x)^E, {x, 0, m}]]]; A109271=Floor[ CoefficientList[ns, x]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|