login
Expansion of e.g.f. exp(x)*(1+tan(x))/((1-tan(x))*(tan(x)+sec(x))).
0

%I #16 Sep 29 2023 12:01:45

%S 1,2,4,15,72,467,3534,31675,321832,3692927,46988914,658330035,

%T 10056866292,166476324887,2967375285294,56673879465595,

%U 1154538708267952,24990204586402847,572731801523141674,13855288923332516355,352821804274904668812,9433763230045116440807,264251645557758720762054

%N Expansion of e.g.f. exp(x)*(1+tan(x))/((1-tan(x))*(tan(x)+sec(x))).

%H C. K. Cook, M. R. Bacon, and R. A. Hillman, <a href="https://www.fq.math.ca/Papers1/55-3/CookBaconHillman01222017.pdf">Higher-order Boustrophedon transforms for certain well-known sequences</a>, Fib. Q., 55(3) (2017), 201-208.

%F 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

%t 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 *)

%Y Cf. A000834.

%K nonn

%O 0,2

%A _N. J. A. Sloane_, Sep 26 2017