A298563 Numbers k such that k - 2 | sigma(k).
1, 3, 5, 6, 14, 44, 110, 152, 884, 2144, 8384, 18632, 116624, 8394752, 15370304, 73995392, 536920064, 2147581952, 34360131584, 27034175140420610, 36028797421617152, 576460753914036224
Offset: 1
Examples
For k=44, sigma(k)/(k-2) = sigma(44)/(44-2) = 84/42 = 2, so 44 belongs to the sequence; for k=110, sigma(k)/(k-2) = sigma(110)/(110-2) = 216/108 = 2, so 110 is also a term.
Programs
-
Magma
[n: n in [3..10^7]| DivisorSigma(1, n) mod (n-2) eq 0]; // Vincenzo Librandi, Jan 22 2018
-
Mathematica
Select[Range[10^6], Divisible[DivisorSigma[1, #], # - 2] &] (* Michael De Vlieger, Jan 21 2018 *)
-
PARI
isok(k) = (k!=2) && !(sigma(k) % (k-2)); \\ Michel Marcus, Jan 22 2018
Extensions
a(17)-a(18) from Robert G. Wilson v, Jan 21 2018
a(19) from Giovanni Resta, Jan 23 2018
a(20)-a(22) from Max Alekseyev, May 27 2025
Comments