

A012770


log(cosh(x)*cos(x))=4/4!*x^4544/8!*x^8707584/12!*x^12...


0



4, 544, 707584, 3807514624, 58177770225664, 2030847773013704704, 140503203207887919775744, 17427925514250338592341622784, 3597303386901777560143500698189824, 1166406649834620087886383283250988580864
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


LINKS

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


MAPLE

g := taylor(log(cosh(x)*cos(x)), x=0, 100):q := seq(abs(coeff(g, x, 4*i)*(4*i)!), i=1..15);


MATHEMATICA

With[{nn=40}, Take[CoefficientList[Series[Log[Cosh[x]Cos[x]], {x, 0, nn}], x] Range[0, nn]!, {5, 1, 4}]] (* Harvey P. Dale, Mar 15 2015 *)


CROSSREFS

Sequence in context: A295206 A209608 A159367 * A332154 A202032 A267066
Adjacent sequences: A012767 A012768 A012769 * A012771 A012772 A012773


KEYWORD

nonn


AUTHOR

Patrick Demichel (patrick.demichel(AT)hp.com)


EXTENSIONS

More terms from Sascha Kurz and Vladeta Jovovic, Apr 04 2002
Definition corrected by Harvey P. Dale, Mar 15 2015


STATUS

approved



