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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A009601 Expansion of e.g.f.: sinh(tan(log(1+x))). 1
0, 1, -1, 5, -24, 166, -1350, 13026, -143808, 1790560, -24782400, 377280056, -6262125936, 112504698840, -2174463129384, 44977635083096, -991157036904960, 23178047520065536, -573180268144301568, 14943307041391438080 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..429

MATHEMATICA

With[{nn=20}, CoefficientList[Series[Sinh[Tan[Log[1+x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 10 2017 *)

PROG

(PARI) x='x+O('x^30); concat([0], Vec(serlaplace(sinh(tanh(log(1+x)))))) \\ G. C. Greubel, Jan 30 2018

CROSSREFS

Sequence in context: A340358 A009424 A184597 * A009676 A192995 A027851

Adjacent sequences: A009598 A009599 A009600 * A009602 A009603 A009604

KEYWORD

sign,easy

AUTHOR

R. H. Hardin

EXTENSIONS

Extended with signs by Olivier Gérard, Mar 15 1997

Definition clarified and previous Mathematica program replaced by Harvey P. Dale, Jun 10 2017

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 30 15:01 EST 2023. Contains 359945 sequences. (Running on oeis4.)