|
|
A009230
|
|
a(n) = lcm(n, d(n)).
|
|
9
|
|
|
1, 2, 6, 12, 10, 12, 14, 8, 9, 20, 22, 12, 26, 28, 60, 80, 34, 18, 38, 60, 84, 44, 46, 24, 75, 52, 108, 84, 58, 120, 62, 96, 132, 68, 140, 36, 74, 76, 156, 40, 82, 168, 86, 132, 90, 92, 94, 240, 147, 150, 204, 156, 106, 216, 220, 56, 228, 116, 118, 60, 122, 124, 126, 448
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
a:= n-> ilcm(n, numtheory[tau](n)):
|
|
MATHEMATICA
|
Table[LCM[n, DivisorSigma[0, n]], {n, 70}] (* Harvey P. Dale, Jul 31 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|