login
A172087
A001897 with terms repeated.
4
1, 1, 3, 3, 15, 15, 21, 21, 15, 15, 33, 33, 1365, 1365, 3, 3, 255, 255, 399, 399, 165, 165, 69, 69, 1365, 1365, 3, 3, 435, 435, 7161, 7161, 255, 255, 3, 3, 959595, 959595, 3, 3, 6765, 6765, 903, 903, 345, 345, 141, 141
OFFSET
0,3
MATHEMATICA
b[n_] := -2*(2^(2*n - 1) - 1)*BernoulliB[2*n]; t = Table[b[n], {n, 0, 30}] // Denominator; A172087 = Transpose[{t, t}] // Flatten (* Jean-François Alcover, Jan 11 2016 *)
CROSSREFS
Sequence in context: A280840 A212200 A333862 * A086116 A100735 A362531
KEYWORD
nonn
AUTHOR
Paul Curtz, Jan 25 2010
EXTENSIONS
More terms from Jean-François Alcover, Jan 11 2016
Edited by N. J. A. Sloane, Apr 22 2021.
STATUS
approved