

A009406


Expansion of e.g.f.: log(1+x)*cos(sin(x)).


0



0, 1, 1, 1, 0, 29, 105, 307, 2744, 27417, 236025, 2249895, 25156296, 306281013, 3983598801, 55800877467, 839348702160, 13462454942385, 229273833323025, 4133677629311823, 78661216493101680, 1575432052386178509
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,6


LINKS

Table of n, a(n) for n=0..21.


FORMULA

a(n) ~ (n1)! * (1)^(n+1) * cos(sin(1)).  Vaclav Kotesovec, Jan 23 2015


MATHEMATICA

With[{nn=30}, CoefficientList[Series[Log[1+x]*Cos[Sin[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Sep 19 2014 *)


CROSSREFS

Sequence in context: A009435 A126554 A258721 * A211496 A233049 A233050
Adjacent sequences: A009403 A009404 A009405 * A009407 A009408 A009409


KEYWORD

sign,easy


AUTHOR

R. H. Hardin


EXTENSIONS

Extended with signs by Olivier Gérard, Mar 15 1997
Prior Mathematica program replaced and definition clarified by Harvey P. Dale, Sep 19 2014


STATUS

approved



