OFFSET
0,1
COMMENTS
All terms are multiples of 3.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..2500
MAPLE
MATHEMATICA
A051717 := Join[{1}, Denominator[Total /@ Partition[BernoulliB[Range[0, 500]], 2, 1]]]; Join[{3, 9}, Table[2*A051717[[2*n]], {n, 3, 30}]] (* G. C. Greubel, Dec 22 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Jul 16 2008
EXTENSIONS
Edited and extended by R. J. Mathar, Jun 28 2009
STATUS
approved