|
|
A349267
|
|
Generalized Euler numbers, a(n) = n!*[x^n](sec(8*x)*2*(sin(4*x) + cos(4*x))).
|
|
4
|
|
|
2, 8, 96, 1408, 29184, 739328, 22634496, 806453248, 32864600064, 1506300919808, 76717014122496, 4297849713983488, 262665886073094144, 17390688314209599488, 1239981021847665770496, 94727563504456856240128, 7719096548270543600615424, 668321603392783694711226368
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
For references and cross references, compare the overview in A349264.
|
|
LINKS
|
|
|
MAPLE
|
sec(8*x)*2*(sin(4*x) + cos(4*x)): series(%, x, 20): seq(n!*coeff(%, x, n), n = 0..17);
|
|
MATHEMATICA
|
m = 17; CoefficientList[Series[2 * Sec[8*x] * (Sin[4*x] + Cos[4*x]), {x, 0, m}], x] * Range[0, m]! (* Amiram Eldar, Nov 21 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|