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!)
A009460 Expansion of e.g.f.: sin(log(1+x))/cosh(x). 0
0, 1, -1, -2, 6, 5, 15, -772, 5348, -28579, 304875, -4039686, 44824626, -502746231, 6786025155, -100850039760, 1517589587400, -23931346331175, 408793231839735, -7414418761808394, 140090661066968990, -2772125867840390355 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,4
LINKS
MATHEMATICA
CoefficientList[Series[Sech[x]*Sin[Log[1 + x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jan 24 2015 *)
With[{nn=30}, CoefficientList[Series[Sin[Log[1+x]]/Cosh[x], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 26 2019 *)
CROSSREFS
Sequence in context: A092313 A318358 A230383 * A085205 A094595 A182830
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Previous Mathematica program replaced and definition clarified by Harvey P. Dale, Dec 26 2019
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 March 29 04:23 EDT 2024. Contains 371264 sequences. (Running on oeis4.)