login
A009457
Expansion of sin(log(1+x))*exp(x).
0
0, 1, 1, 1, 2, -5, 41, -289, 2316, -20383, 196965, -2077319, 23780646, -293954869, 3904755557, -55497739465, 840656150296, -13523247084319, 230285930161321, -4139153666264303, 78317988438360330
OFFSET
0,5
MATHEMATICA
Sin[ Log[ 1+x ] ]*Exp[ x ]
CoefficientList[Series[E^x*Sin[Log[1 + x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 24 2015 *)
CROSSREFS
Sequence in context: A054553 A185052 A088547 * A175172 A376620 A218057
KEYWORD
sign
AUTHOR
STATUS
approved