|
|
A176327
|
|
Numerators of the rational sequence with e.g.f. (x/2)*(1+exp(-x))/(1-exp(-x)).
|
|
17
|
|
|
1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 5, 0, -691, 0, 7, 0, -3617, 0, 43867, 0, -174611, 0, 854513, 0, -236364091, 0, 8553103, 0, -23749461029, 0, 8615841276005, 0, -7709321041217, 0, 2577687858367, 0, -26315271553053477373, 0, 2929993913841559, 0, -261082718496449122051
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,11
|
|
COMMENTS
|
Numerator of the Bernoulli number B_n, except B(1)=0.
This could formally be defined by building the arithmetic mean of the numerators in A164555(n) and A027641(n).
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
seq(numer((bernoulli(i, 0)+bernoulli(i, 1))/2), i=0..40); # Peter Luschny, Jun 17 2012
|
|
MATHEMATICA
|
terms = 41; egf = (x/2)*((1 + Exp[-x])/(1 - Exp[-x])) + O[x]^(terms+1);
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|