S000054


Composite numbers n that divide the sum of the composite numbers up to n.

4, 9, 604, 1849, 7123, 29588, 71056, 317238, 945414, 1347895, 3567705, 4624025, 8518502, 1523051853

1

S000054

T. D. Noe, Plot of 14 terms

Example: 9 is here because 9 divides 4 + 6 + 8 + 9 = 27.

(Mma) s = 0; t = {}; Do[If[! PrimeQ[n], s = s + n; If[Mod[s, n] == 0, AppendTo[t, n]]], {n, 2, 10^6}]; t

Cf. A007506A009560, A234540, S000055S000056.

nonn,hard,more

T. D. Noe, May 16 2014

© Tony D Noe 2014-2015