|
|
A055970
|
|
Nonprime numbers k such that k | sigma_3(k) + phi(k)^3.
|
|
2
|
|
|
1, 195, 366, 735, 780, 810, 860, 1070, 1692, 2940, 3135, 5535, 6076, 7344, 13194, 15980, 20320, 37638, 47520, 54216, 62296, 89964, 95208, 121770, 135540, 135681, 138278, 138456, 140228, 140284, 158598, 161602, 162432, 189777, 205400, 268380
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ If[ !PrimeQ[ n ], If[ Mod[ DivisorSigma[ 3, n ]+EulerPhi[ n ]^3, n ]==0, Print[ n ] ] ], {n, 1, 500000} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|