The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A009053 Expansion of e.g.f. cos(sinh(log(1+x))). 1
 1, 0, -1, 3, -14, 80, -526, 3906, -32192, 290016, -2816056, 29050120, -313052024, 3442154352, -37060529416, 353733158520, -1866295941824, -42066299646976, 2247562825065152, -73960387213018176, 2159580310527713536 (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[Sinh[Log[1+x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 19 2013 *) PROG (PARI) x='x+O('x^30); Vec(serlaplace(cos(sinh(log(1+x))))) \\ G. C. Greubel, Jul 23 2018 (Magma) m:=30; R:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!(Cos(Sinh(Log(1+x))))); [Factorial(n-1)*b[n]: n in [1..m]]; // G. C. Greubel, Jul 23 2018 CROSSREFS Sequence in context: A107596 A212391 A000264 * A202474 A347001 A354325 Adjacent sequences: A009050 A009051 A009052 * A009054 A009055 A009056 KEYWORD sign,easy AUTHOR R. H. Hardin EXTENSIONS Extended with signs by Olivier Gérard, Mar 15 1997 Mathematica program replaced by Harvey P. Dale, Oct 19 2013 STATUS approved

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

Last modified September 26 07:50 EDT 2023. Contains 365654 sequences. (Running on oeis4.)