login
A140814
a(0)=3, a(n)=A002445(n) for n >= 1.
2
3, 6, 30, 42, 30, 66, 2730, 6, 510, 798, 330, 138, 2730, 6, 870, 14322, 510, 6, 1919190, 6, 13530, 1806, 690, 282, 46410, 66, 1590, 798, 870, 354, 56786730, 6, 510, 64722, 30, 4686, 140100870, 6, 30, 3318, 230010, 498, 3404310, 6, 61410, 272118, 1410, 6
OFFSET
0,1
LINKS
FORMULA
a(n) = A106458(2*n) + A106458(2*n+1).
a(n) = A027762(n) for n >= 1. - Georg Fischer, Nov 03 2018
MATHEMATICA
Join[{3}, Table[Denominator[BernoulliB[2 n]], {n, 60}]] (* Vincenzo Librandi, Nov 04 2018 *)
PROG
(Magma) [3] cat [Denominator(Bernoulli(2*n)): n in [1..60]]; // Vincenzo Librandi, Nov 04 2018
CROSSREFS
Sequence in context: A275786 A025555 A200925 * A343433 A136932 A136945
KEYWORD
nonn,less
AUTHOR
Paul Curtz, Jul 16 2008
EXTENSIONS
Edited and extended by R. J. Mathar, Jul 29 2008
STATUS
approved