login
This site is supported by donations to The OEIS Foundation.

 

Logo


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

R. H. Hardin

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 22 09:20 EST 2018. Contains 299447 sequences. (Running on oeis4.)