login
A051549
a(n) = LCM { sigma(1), ..., sigma(n) }.
1
1, 3, 12, 84, 84, 84, 168, 840, 10920, 32760, 32760, 32760, 32760, 32760, 32760, 1015560, 1015560, 1015560, 1015560, 1015560, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240, 4062240
OFFSET
0,2
MATHEMATICA
nn=40; With[{sig=DivisorSigma[1, Range[nn]]}, Table[LCM@@Take[sig, n], {n, nn}]] (* Harvey P. Dale, Nov 15 2013 *)
CROSSREFS
Cf. A000203.
Sequence in context: A376012 A212718 A357846 * A245775 A277782 A066780
KEYWORD
nonn
STATUS
approved