login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A277464 E.g.f.: cosh(x)/(1 + LambertW(-x)). 4
1, 1, 5, 30, 281, 3400, 50557, 890120, 18101617, 417464064, 10764826421, 306893014912, 9584448407305, 325407839778944, 11933432488693549, 470087171351873280, 19796492491889197025, 887518214183286390784, 42202928616264032249701, 2121583256369642798845952 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

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

FORMULA

a(n) ~ cosh(exp(-1)) * n^n.

MATHEMATICA

CoefficientList[Series[Cosh[x]/(1+LambertW[-x]), {x, 0, 25}], x] * Range[0, 25]!

Table[(1+(-1)^n + Sum[(1+(-1)^(n-k)) * Binomial[n, k] * k^k, {k, 1, n}])/2, {n, 0, 25}]

PROG

(PARI) x='x+O('x^50); Vec(serlaplace(cosh(x)/(1 + lambertw(-x)))) \\ G. C. Greubel, Nov 07 2017

CROSSREFS

Cf. A000312, A069856, A086331, A277462, A277463.

Sequence in context: A279155 A245247 A199131 * A258300 A276752 A052172

Adjacent sequences:  A277461 A277462 A277463 * A277465 A277466 A277467

KEYWORD

nonn

AUTHOR

Vaclav Kotesovec, Oct 16 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 April 9 14:24 EDT 2020. Contains 333355 sequences. (Running on oeis4.)