login
A274564
Numbers k such that sigma(k) == 0 (mod k-9).
9
6, 7, 8, 10, 11, 15, 19, 24, 33, 105, 33705, 33624064, 2199041081344, 36893488220433547264
OFFSET
1,1
EXAMPLE
sigma(10) mod (10 - 9) = 18 mod 1 = 0.
MATHEMATICA
k = -9; Select[Range[Abs@k+1, 10^6], Mod[DivisorSigma[1, #], # + k] == 0 &] (* Vincenzo Librandi, Jul 06 2016 *)
PROG
(Magma) [n: n in [10..2*10^6] | SumOfDivisors(n) mod (n-9) eq 0 ]; // Vincenzo Librandi, Jul 06 2016
(PARI) isok(k) = (k!=9) && (Mod(sigma(k), k-9) == 0); \\ Michel Marcus, May 30 2025
KEYWORD
nonn,more
AUTHOR
Paolo P. Lava, Jul 06 2016
EXTENSIONS
a(12)-a(13) from Giovanni Resta, Jul 06 2016
Terms 6,7,8 inserted by Max Alekseyev, May 29 2025
a(14) from Max Alekseyev, Jan 30 2026
STATUS
approved