|
|
A348468
|
|
Expansion of e.g.f. sqrt(exp(x)*(2-exp(x))).
|
|
3
|
|
|
1, 0, -1, -3, -10, -45, -271, -2058, -18775, -199335, -2410516, -32683563, -490870315, -8087188200, -144994236661, -2810079139143, -58536519252130, -1304198088413265, -30946462816602331, -779104979758256298, -20742005411397108595, -582214473250983046155, -17184302765073000634276
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ -sqrt(2) * n^(n-1) / (log(2)^(n - 1/2) * exp(n)). - Vaclav Kotesovec, Oct 21 2021
|
|
MATHEMATICA
|
m = 22; Range[0, m]! * CoefficientList[Series[Sqrt[Exp[x]*(2 - Exp[x])], {x, 0, m}], x] (* Amiram Eldar, Oct 19 2021 *)
|
|
PROG
|
(PARI) my(x='x+O('x^25)); Vec(serlaplace(sqrt(exp(x)*(2-exp(x)))))
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|