|
|
A292757
|
|
Expansion of e.g.f. exp(x)*(1+tan(x))/((1-tan(x))*(tan(x)+sec(x))).
|
|
0
|
|
|
1, 2, 4, 15, 72, 467, 3534, 31675, 321832, 3692927, 46988914, 658330035, 10056866292, 166476324887, 2967375285294, 56673879465595, 1154538708267952, 24990204586402847, 572731801523141674, 13855288923332516355, 352821804274904668812, 9433763230045116440807, 264251645557758720762054
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ 2^(2*n + 3) * n^(n + 1/2) / ((2 + sqrt(2)) * Pi^(n + 1/2) * exp(n - Pi/4)). - Vaclav Kotesovec, Jun 02 2019
|
|
MATHEMATICA
|
nmax = 20; CoefficientList[Series[Exp[x]*(1+Tan[x])/((1-Tan[x])*(Tan[x]+Sec[x])), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Jun 02 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|