|
Search: id:A055164
|
|
|
| A055164 |
|
(n - Phi(n)) | Sigma(n) for composite n not congruent to 2 (mod 4). |
|
+0 1
|
|
| 99, 168, 187, 493, 637, 780, 943, 1273, 1537, 1836, 2183, 2225, 2976, 3103, 3589, 4183, 5353, 5928, 6201, 6468, 6667, 8881, 9553, 9727, 13393, 13888, 14453, 15397, 17587, 19897, 24253, 24883, 30883, 33667, 36259, 36853, 37523, 43657, 45901
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[ If[ !PrimeQ[ n ], If[ Mod[ n, 4 ]! = 0, If[ Mod[ DivisorSigma[ 1, n ], n-EulerPhi[ n ] ] == 0, Print[ n ] ] ], {n, 1, 5000} ]
|
|
CROSSREFS
|
Sequence in context: A095420 A064112 A126230 this_sequence A075815 A075814 A097599
Adjacent sequences: A055161 A055162 A055163 this_sequence A055165 A055166 A055167
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 30 2000
|
|
|
Search completed in 0.002 seconds
|