A138729 a(n) = -A085466(n) times the free coefficient of the 2n-th Du Bois-Reymond polynomial in e^2.

7, 25, 98, 1167, 4650, 30930, 1111860, 31100895, 13812610, 894570642, 89419472100, 1311049104750, 47185076099700, 350440263072900, 4578242813103960, 4119778157653533375, 16476927824724617250, 124478128839848033250, 40326914169455544130500

Offset

1,1

Links

Table of n, a(n) for n=1..19.

Mathematica

a = {7}; Do[p = FullSimplify[TrigToExp[ -3 - 2Residue[x^2/((Tan[x] - x) (1 + x^2)^n), {x, I}]]]; AppendTo[a, -First[p[[2]]]], {n, 2, 9}]; a (*Artur Jasinski*)

Crossrefs

Cf. A062545, A062546, A085466, A085467, A138729, A138730, A138731, A138732, A138733.

Sequence in context: A256370 A199116 A304421 * A035509 A332942 A247173

Adjacent sequences: A138726 A138727 A138728 * A138730 A138731 A138732

Keyword

nonn

Author

Artur Jasinski, Mar 26 2008

Extensions

Edited and extended by Max Alekseyev, Sep 15 2009

Status

approved