A274551 Numbers k such that sigma(k) == 0 (mod k+3).
4, 8925, 32445, 442365
Offset: 1
Examples
sigma(4) mod (4+3) = 7 mod 7 = 0.
Programs
-
Magma
[n: n in [1..2*10^6] | SumOfDivisors(n) mod (n+3) eq 0 ]; // Vincenzo Librandi, Jul 02 2016
-
Mathematica
Select[Range[10^6], Mod[DivisorSigma[1, #], # + 3] == 0 &] (* Michael De Vlieger, Jul 01 2016 *)
-
PARI
is(n) = Mod(sigma(n), n+3)==0 \\ Felix Fröhlich, Jul 01 2016
Comments