|
|
A072824
|
|
Sum of aliquot divisors of Ramanujan's highly composite numbers.
|
|
1
|
|
|
0, 1, 3, 6, 16, 36, 55, 76, 108, 240, 366, 504, 810, 1698, 2040, 3108, 4272, 6840, 14304, 21240, 29232, 44400, 59088, 74744, 84600, 134688, 152712, 176688, 262440, 360864, 547920, 729216, 922128, 1118880, 1661616, 1882944, 2260800, 2529072
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(3) = 3 because sum of aliquot divisors of 3rd highly composite number i.e. 4 is 1 + 2 = 3.
|
|
MATHEMATICA
|
aliq[n_] := DivisorSigma[1, n] - n; s = {}; dm = 0; Do[d = DivisorSigma[0, n]; If[d > dm, dm = d; AppendTo[s, aliq[n]]], {n, 1, 1000}]; s (* Amiram Eldar, Aug 05 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|