|
|
A009174
|
|
Expansion of e.g.f.: cosh(x)*cos(log(1+x)).
|
|
0
|
|
|
1, 0, 0, 3, -15, 70, -354, 1995, -12667, 89892, -705244, 6042575, -55837075, 548985138, -5650236630, 59493168735, -615581655639, 5683518687560, -30016869620472, -587400084741573, 31322604753002761, -1006072267431660450
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{nn=30}, CoefficientList[Series[Cosh[x]*Cos[Log[1+x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 09 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|