OFFSET
1,1
EXAMPLE
sigma(8) mod (8+7) = 15 mod 15 = 0.
MATHEMATICA
Select[Range[10^6], Mod[DivisorSigma[1, #], # + 7] == 0 &] (* Michael De Vlieger, Jul 05 2016 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Paolo P. Lava, Jul 05 2016
EXTENSIONS
a(6)-a(7) from Giovanni Resta, Jul 05 2016
a(8) from Max Alekseyev, May 29 2025
STATUS
approved
