|
|
A248022
|
|
Achilles numbers which are coprime to the sum of their divisors.
|
|
1
|
|
|
392, 800, 968, 1352, 2312, 2888, 3087, 3267, 3872, 4232, 5408, 6075, 6125, 6272, 6728, 7688, 7803, 9248, 10952, 11552, 12800, 13448, 14283, 14792, 15125, 15488, 16928, 17672, 19208, 20000, 21632, 22472, 22707, 25088, 26912, 27783, 27848, 29403, 29768, 30752, 33275
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
achillesQ[n_] := Block[{ls = Last /@ FactorInteger@ n}, Min@ ls > 1 == GCD @@ ls]; Select[ Range@ 35000, achillesQ[ #] && GCD[#, DivisorSigma[1, #]] == 1 &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|