OFFSET
1,1
LINKS
Max Alekseyev, Table of n, a(n) for n = 1..50
EXAMPLE
sigma(10) mod (10 + 8) = 18 mod 18 = 0.
MATHEMATICA
Select[Range[10^6], Mod[DivisorSigma[1, #], # + 8] == 0 &] (* Michael De Vlieger, Jul 05 2016 *)
PROG
(PARI) isok(k) = sigma(k) % (k+8) == 0; \\ Michel Marcus, Oct 14 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Paolo P. Lava, Jul 05 2016
EXTENSIONS
a(16)-a(35) from Giovanni Resta, Jul 05 2016
STATUS
approved
