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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A009654 Expansion of e.g.f.: tan(log(1+x)/exp(x)). 0
0, 1, -3, 10, -60, 535, -5545, 65182, -880992, 13534757, -231683143, 4360580794, -89533557212, 1992568741579, -47774231187709, 1227455840670542, -33641659053337888, 979722562830640169, -30211554791018748267 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Table of n, a(n) for n=0..18.

MATHEMATICA

With[{nn=20}, CoefficientList[Series[Tan[Log[1+x]/Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jan 07 2016 *)

CROSSREFS

Sequence in context: A245312 A018932 A111562 * A013565 A156075 A034889

Adjacent sequences:  A009651 A009652 A009653 * A009655 A009656 A009657

KEYWORD

sign,easy

AUTHOR

R. H. Hardin

EXTENSIONS

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

Definition clarified and prior Mathematica program replaced by Harvey P. Dale, Jan 07 2016

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 24 19:42 EDT 2019. Contains 321448 sequences. (Running on oeis4.)