OFFSET
0,3
LINKS
Eric Weisstein's World of Mathematics, du Bois-Reymond Constants
EXAMPLE
{(-7 + e^2)/2, (-25 - 4*e^2 + e^4)/8, (-98 + 3*e^2 - 6*e^4 + e^6)/32}.
MATHEMATICA
c[2] = (1/2)*(E^2 - 7); c[n_] := Simplify[ ExpToTrig[ -2*Residue[ x^2/((x^2 + 1)^(n/2)*(Tan[x] - x)), {x, I}] - 3]]; row[n_] := Reverse[ coes = CoefficientList[ c[n], E^2]; coes*LCM @@ Denominator[coes]]; Flatten[ Table[ row[2*n], {n, 1, 9}]] (* Jean-François Alcover, Oct 25 2012, from formula given in A085466 *)
CROSSREFS
KEYWORD
AUTHOR
Eric W. Weisstein, Jul 01 2003
EXTENSIONS
Sequence has been prepended with a(0)=0 to enable table display (so offset has been set to 0 accordingly) by Michel Marcus, Sep 11 2013
STATUS
approved