A088834 Numbers k such that sigma(k) == 6 (mod k).
1, 5, 6, 25, 180, 8925, 32445, 442365
Offset: 1
Examples
Sigma(25) = 31 = 1*25 + 6, so 31 mod 25 = 6.
Links
- Farideh Firoozbakht and M. F. Hasler, Variations on Euclid's formula for perfect numbers, Journal of Integer Sequences 13 (2010), 18 pp. Article ID 10.3.1.
Crossrefs
Programs
-
Mathematica
Select[Range[1000000], Mod[DivisorSigma[1, #] - 6, #] == 0 &] (* T. D. Noe, Dec 03 2013 *)
-
PARI
isok(n) = Mod(sigma(n), n) == 6; \\ Michel Marcus, Jan 03 2023
Extensions
Terms corrected by Charles R Greathouse IV and Farideh Firoozbakht, Dec 03 2013
Comments