login
A097017
a(n) = sigma(5*n) modulo 6.
1
0, 0, 0, 0, 1, 0, 0, 0, 0, 3, 0, 0, 0, 0, 4, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 3, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2
OFFSET
1,10
COMMENTS
a(n) = 0 if A112765(n) is even. - Robert Israel, Feb 27 2018
LINKS
FORMULA
a(n) = A084301(5*n).
MAPLE
f:= n -> numtheory:-sigma(5*n) mod 6;
map(f, [$1.100]); # Robert Israel, Feb 27 2018
MATHEMATICA
Mod[#, 6]&/@DivisorSigma[1, 5*Range[110]] (* Harvey P. Dale, Jan 14 2019 *)
PROG
(PARI) a(n) = sigma(5*n) % 6; \\ Michel Marcus, Mar 08 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Aug 23 2004
EXTENSIONS
Definition clarified by Harvey P. Dale, Jan 14 2019
STATUS
approved