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!)
A092148 Expansion of e.g.f. 1/(exp(x)-x*exp(2*x)). 4
1, 0, 3, 11, 85, 739, 7831, 96641, 1363209, 21632759, 381433771, 7398080029, 156533563693, 3588046200179, 88571349871551, 2342565398442569, 66087436823953681, 1980956920420309231, 62871632567144951635, 2106277265332074827573, 74276723394195659799861 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
LINKS
FORMULA
a(n) = n! * Sum_{k=0..n} (n-k-1)^k/k!. [Corrected by Georg Fischer, Jun 22 2022]
a(n) ~ n! / ((LambertW(1) + 1) * LambertW(1)^(n-1)). - Vaclav Kotesovec, Jun 22 2022
MATHEMATICA
With[{nn=20}, CoefficientList[Series[1/(Exp[x]-x Exp[2x]), {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Sep 19 2020 *)
PROG
(PARI) a(n)=(n)!*sum(k=0, n, (n-k-1)^k/k!))
CROSSREFS
Sequence in context: A097495 A228034 A157980 * A297485 A231066 A091547
KEYWORD
nonn
AUTHOR
Ralf Stephan, Mar 31 2004
EXTENSIONS
Corrected and extended by Harvey P. Dale, Sep 19 2020
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 11:14 EDT 2024. Contains 371278 sequences. (Running on oeis4.)