A084302 Remainder of tau(n) modulo 6.
1, 2, 2, 3, 2, 4, 2, 4, 3, 4, 2, 0, 2, 4, 4, 5, 2, 0, 2, 0, 4, 4, 2, 2, 3, 4, 4, 0, 2, 2, 2, 0, 4, 4, 4, 3, 2, 4, 4, 2, 2, 2, 2, 0, 0, 4, 2, 4, 3, 0, 4, 0, 2, 2, 4, 2, 4, 4, 2, 0, 2, 4, 0, 1, 4, 2, 2, 0, 4, 2, 2, 0, 2, 4, 0, 0, 4, 2, 2, 4, 5, 4, 2, 0, 4, 4, 4, 2, 2, 0, 4, 0, 4, 4, 4, 0, 2, 0, 0, 3, 2, 2, 2, 2, 2
Offset: 1
Links
Programs
-
Mathematica
Mod[DivisorSigma[0,Range[110]],6] (* Harvey P. Dale, Sep 04 2020 *)
-
PARI
A084302(n) = (numdiv(n)%6); \\ Antti Karttunen, Jul 07 2017
Formula
a(n) = A000005(n) modulo 6.
Comments