|
%I #8 Nov 21 2021 08:04:28
%S 2,12,126,2160,49410,1415232,48649086,1951153920,89434106370,
%T 4611775398912,264235243691646,16653520425185280,1145011717430672130,
%U 85285640517460180992,6841110155700330881406,587950108643300554506240,53899295662946509072626690,5249943672359370392053481472
%N Generalized Euler numbers, a(n) = n!*[x^n](sec(9*x)*(4*sin(3*x) + 2)*cos(3*x)^2).
%C For references and cross references, compare the overview in A349264.
%p sec(9*x)*(4*sin(3*x) + 2)*cos(3*x)^2: series(%, x, 20): seq(n!*coeff(%, x, n), n = 0..17);
%t m = 17; CoefficientList[Series[Sec[9*x] * (4 * Sin[3*x] + 2) * Cos[3*x]^2, {x, 0, m}], x] * Range[0, m]! (* _Amiram Eldar_, Nov 21 2021 *)
%Y Bisections: A064070, A064074.
%Y Cf. A349264.
%K nonn
%O 0,1
%A _Peter Luschny_, Nov 21 2021
|
