OFFSET
1,2
COMMENTS
Nonprime numbers k such that k == -1 (mod A000005(k)).
MATHEMATICA
Select[Range[500], ! PrimeQ[#] && Divisible[# + 1, DivisorSigma[0, #]] &] (* Amiram Eldar, Jun 03 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Max Alekseyev, Jun 03 2022
STATUS
approved