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!)
A362322 a(n) = n! * Sum_{k=0..floor(n/4)} (-n)^k / (k! * (n-4*k)!). 2
1, 1, 1, 1, -95, -599, -2159, -5879, 1276801, 14669425, 90669601, 402407281, -136515598559, -2275742812199, -19922903656655, -122565283331399, 56538094207096321, 1235380139032068961, 13993348375743336001, 110062069784059565665 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,5
LINKS
Eric Weisstein's World of Mathematics, Lambert W-Function.
FORMULA
a(n) = n! * [x^n] exp(x - n*x^4).
E.g.f.: exp( ( LambertW(4*x^4)/4 )^(1/4) ) / (1 + LambertW(4*x^4)).
PROG
(PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(exp((lambertw(4*x^4)/4)^(1/4))/(1+lambertw(4*x^4))))
CROSSREFS
Sequence in context: A217133 A055823 A116250 * A020322 A055829 A243801
KEYWORD
sign
AUTHOR
Seiichi Manyama, Apr 16 2023
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 June 20 11:12 EDT 2024. Contains 373527 sequences. (Running on oeis4.)