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!)
A009653 Expansion of tan(log(1+x)/cosh(x)). 1
0, 1, -1, 1, -12, 55, -255, 2679, -23632, 201245, -2409525, 30433181, -383307804, 5609915779, -89478694851, 1470425213763, -26173709472960, 501554172182201, -10043883092049993, 212501921779526329, -4764376768067195020 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,5

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 0..100

MATHEMATICA

With[{nn=20}, CoefficientList[Series[Tan[Log[1+x]/Cosh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 28 2013 *)

CROSSREFS

Sequence in context: A207102 A343539 A229424 * A133001 A340517 A104188

Adjacent sequences:  A009650 A009651 A009652 * A009654 A009655 A009656

KEYWORD

sign,easy

AUTHOR

R. H. Hardin

EXTENSIONS

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

Prior Mathematica program replaced by Harvey P. Dale, May 28 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 September 26 14:21 EDT 2022. Contains 356999 sequences. (Running on oeis4.)