A274558 Numbers k such that sigma(k) == 0 (mod k-6).
5, 7, 13, 14, 20, 30, 45, 76, 630, 688, 2310, 8896, 133888, 537051136, 1631268870, 35184418226176, 144115191028645888, 2305843021024854016
Offset: 1
Examples
sigma(7) mod (7-6) = 8 mod 1 = 0.
Crossrefs
Programs
-
Mathematica
Select[Range[7, 10^6], # - 6 != 0 && Mod[DivisorSigma[1, #], # - 6] == 0 &] (* Michael De Vlieger, Jul 05 2016 *)
Extensions
a(14)-a(15) from Giovanni Resta
Term 5 inserted, a(16)-a(18) added by Max Alekseyev, Jun 04 2025
Comments