A173080 Positive integers with the property that the sum of the cubes of their divisors is a multiple of 585.

8, 24, 40, 56, 72, 88, 104, 120, 128, 136, 152, 168, 179, 184, 200, 216, 232, 248, 264, 280, 296, 312, 323, 328, 344, 358, 360, 376, 384, 389, 392, 398, 408, 424, 437, 440, 456, 459, 472, 488, 493, 504, 520, 536, 537, 552, 568, 569, 584, 600, 616, 621, 632

Offset

1,1

Comments

It is easy to show that this sequence contains all positive integers of the form 16k+8.

Links

Table of n, a(n) for n=1..53.

Mathematica

Select[Range[700], Divisible[Total[Divisors[#]^3], 585]&]  (* Harvey P. Dale, Feb 23 2011 *)

Prog

(PARI) is(k) = !(sigma(k, 3) % 585); \\ Amiram Eldar, Aug 12 2024

Crossrefs

Cf. A001158.

Sequence in context: A050427 A329549 A031046 * A051062 A152531 A074348

Adjacent sequences: A173077 A173078 A173079 * A173081 A173082 A173083

Keyword

nonn

Author

John W. Layman, Feb 09 2010

Status

approved