This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A009568 Expansion of e.g.f.: sinh(log(1+sinh(x))). 1
 0, 1, -1, 4, -16, 91, -616, 4894, -44416, 453541, -5145856, 64222984, -874402816, 12897183391, -204862698496, 3486535686274, -63292764553216, 1220795601029641, -24931903045697536, 537463528325234764, -12196043454064623616, 290588368323926512291, -7253387436695186046976 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,4 LINKS G. C. Greubel, Table of n, a(n) for n = 0..438 FORMULA a(2*n) = A006154(2*n)/2, n>0. - Ralf Stephan, Apr 29 2004 MATHEMATICA With[{nn=20}, CoefficientList[Series[Sinh[Log[1+Sinh[x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 08 2017 *) PROG (PARI) x='x+O('x^30); concat([0], Vec(serlaplace( sinh(log(1+sinh(x)))))) \\ G. C. Greubel, Jan 21 2018 CROSSREFS Sequence in context: A124962 A292088 A221818 * A139155 A003762 A143501 Adjacent sequences:  A009565 A009566 A009567 * A009569 A009570 A009571 KEYWORD sign,easy AUTHOR EXTENSIONS Extended with signs by Olivier Gérard, Mar 15 1997 Prior Mathematica program replaced and definition clarified by Harvey P. Dale, Dec 08 2017 Terms a(20) to a(22) added by G. C. Greubel, Jan 21 2018 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 18 03:13 EST 2019. Contains 319260 sequences. (Running on oeis4.)