|
|
A169596
|
|
Primes p such that sigma(p+3) = sigma(p-3).
|
|
1
|
|
|
23, 653, 947, 2027, 4133, 5431, 18433, 30089, 39733, 61667, 71233, 120947, 148439, 163673, 238801, 265813, 493853, 502499, 1070033, 1100921, 1139141, 1176127, 1207447, 1364401, 1959961, 1979281, 2164471, 3156319, 3175967, 3195233
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime@ Range[10^5], Equal @@ DivisorSigma[1, # + {-3, 3}] &] (* Giovanni Resta, May 15 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|