

A033470


Numerator of Bernoulli(2n,1/3).


2



1, 1, 13, 121, 1093, 49205, 61203943, 5580127, 25949996501, 2832495743227, 101471818419863, 4469253897850313, 11126033443528968583, 3623473373642099263, 90551915146257709805297, 295654219044074800178128205
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,3


LINKS

Table of n, a(n) for n=0..15.
Index entries for sequences related to Bernoulli numbers.


MAPLE

with(numtheory): seq(numer(bernoulli(2*n, 1/3)), n=0..20);


MATHEMATICA

Table[Numerator @ BernoulliB[2*n, 1/3], {n, 0, 15}] (* Amiram Eldar, Sep 16 2020 *)


PROG

(PARI) a(n) = numerator(subst(bernpol(2*n), x, 1/3)); \\ Michel Marcus, Sep 16 2020


CROSSREFS

Cf. A033471 (denominators).
Sequence in context: A196921 A317483 A096053 * A297594 A326569 A339057
Adjacent sequences: A033467 A033468 A033469 * A033471 A033472 A033473


KEYWORD

sign,frac


AUTHOR

N. J. A. Sloane.


STATUS

approved



