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!)
A009582 Expansion of e.g.f.: sinh(log(1+x)/cos(x)). 1
0, 1, -1, 6, -18, 135, -795, 7266, -62188, 669309, -7267005, 90797894, -1179693966, 16915574299, -254880171455, 4143992814482, -70922672184120, 1292106133397017, -24733436584847481, 499532815860896038 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..448 (terms 0..200 from Vincenzo Librandi)
MATHEMATICA
With[{nn=20}, CoefficientList[Series[Sinh[Log[1+x]/Cos[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 22 2013 *)
PROG
(PARI) x='x+O('x^30); concat([0], Vec(serlaplace(sinh(log(1+x)/cos(x))))) \\ G. C. Greubel, Jan 22 2018
CROSSREFS
Sequence in context: A012758 A208822 A003496 * A222913 A091054 A012774
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, Oct 22 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 29 13:45 EST 2024. Contains 370425 sequences. (Running on oeis4.)