A248151 Numbers n such that the sum of the divisors of n is not divisible by 4.
1, 2, 4, 5, 8, 9, 10, 13, 16, 17, 18, 20, 25, 26, 29, 32, 34, 36, 37, 40, 41, 45, 49, 50, 52, 53, 58, 61, 64, 68, 72, 73, 74, 80, 81, 82, 89, 90, 97, 98, 100, 101, 104, 106, 109, 113, 116, 117, 121, 122, 128, 136, 137, 144, 146, 148, 149, 153, 157, 160, 162, 164, 169, 173, 178, 180
Offset: 1
Keywords
Links
- M. F. Hasler, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Range[200],Mod[DivisorSigma[1,#],4]!=0&] (* Harvey P. Dale, Apr 03 2025 *)
-
PARI
for(n=1,999,sigma(n)%4&&print1(n","))
Comments