A105825 a(n) = sigma(n) (mod 5).
1, 3, 4, 2, 1, 2, 3, 0, 3, 3, 2, 3, 4, 4, 4, 1, 3, 4, 0, 2, 2, 1, 4, 0, 1, 2, 0, 1, 0, 2, 2, 3, 3, 4, 3, 1, 3, 0, 1, 0, 2, 1, 4, 4, 3, 2, 3, 4, 2, 3, 2, 3, 4, 0, 2, 0, 0, 0, 0, 3, 2, 1, 4, 2, 4, 4, 3, 1, 1, 4, 2, 0, 4, 4, 4, 0, 1, 3, 0, 1, 1, 1, 4, 4, 3, 2, 0, 0, 0, 4, 2, 3, 3, 4, 0, 2, 3, 1, 1, 2, 2, 1, 4, 0, 2
Offset: 1
Links
Crossrefs
Programs
-
Maple
A105825:= n-> (numtheory[sigma](n) mod 5): seq (A105825(n), n=1..105); # Jani Melik, Jan 26 2011
-
Mathematica
Mod[DivisorSigma[1,Range[110]],5] (* Harvey P. Dale, Oct 03 2013 *)
-
PARI
a(n)=sigma(n)%5