The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A009020 Expansion of e.g.f.: cos(log(1 + sinh(x))). 1
 1, 0, -1, 3, -14, 70, -406, 2723, -20684, 176100, -1661236, 17182143, -193042904, 2335585330, -30176889016, 412862112263, -5925850093424, 88231921922760, -1341868300356496, 20329433614333083, -291715707804107744 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,4 LINKS Vincenzo Librandi, Table of n, a(n) for n = 0..200 MATHEMATICA With[{nn=20}, CoefficientList[Series[Cos[Log[1+Sinh[x]]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Apr 10 2014 *) PROG (PARI) x='x+O('x^30); Vec(serlaplace(cos(log(1 + sinh(x))))) \\ G. C. Greubel, Jul 22 2018 (MAGMA) m:=30; R:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!(Cos(Log(1 + Sinh(x))))); [Factorial(n-1)*b[n]: n in [1..m]]; // G. C. Greubel, Jul 22 2018 CROSSREFS Sequence in context: A327871 A006772 A320421 * A186765 A109792 A137177 Adjacent sequences:  A009017 A009018 A009019 * A009021 A009022 A009023 KEYWORD sign,easy AUTHOR EXTENSIONS Extended with signs by Olivier Gérard, Mar 15 1997 Definition clarified and Mathematica program replaced by Harvey P. Dale, Apr 10 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 28 22:40 EST 2020. Contains 331328 sequences. (Running on oeis4.)