|
|
A364112
|
|
Expansion of e.g.f. 3*x/(exp(-3*x)+exp(-x)+exp(x))
|
|
0
|
|
|
0, 1, 2, -5, -28, 85, 806, -3185, -41656, 207913, 3428810, -20824925, -413027284, 2961364861, 68560259054, -567040692425, -15005357203312, 140642298254929, 4187120881320338, -43861384856264885, -1450918780756640140, 16798626454194814117, 611263061851828001462, -7751163512199032905505
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
The terms of even indices are related to Bernoulli numbers. For example, 413027284 = 2^2 * 23 * 73 * 89 * 691 and 15005357203312 = 2^4 * 7 * 31 * 41 * 151 * 193 * 3617.
The terms of odd indices are related to the generalized Bernoulli numbers attached to the primitive Dirichlet character of period 3 (see A002111).
|
|
LINKS
|
|
|
FORMULA
|
E.g.f.: 3*x/(exp(-3*x)+exp(-x)+exp(x)).
|
|
PROG
|
(Sage)
x = PowerSeriesRing(QQ, 'x').gen()
N = 20
f = (3*x/((-3*x).exp(N)+(-x).exp(N)+(x).exp(N))).egf_to_ogf()
print(list(f))
(PARI) my(N=25, x='x+O('x^N)); Vec(serlaplace(3*x/(exp(-3*x)+exp(-x)+exp(x))), -N) \\ Michel Marcus, Jul 13 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|