login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = sigma(5*n) modulo 6.
1

%I #19 Jan 14 2019 17:41:17

%S 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,

%T 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,

%U 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

%N a(n) = sigma(5*n) modulo 6.

%C a(n) = 0 if A112765(n) is even. - _Robert Israel_, Feb 27 2018

%H Robert Israel, <a href="/A097017/b097017.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A084301(5*n).

%p f:= n -> numtheory:-sigma(5*n) mod 6;

%p map(f, [$1.100]); # _Robert Israel_, Feb 27 2018

%t Mod[#,6]&/@DivisorSigma[1,5*Range[110]] (* _Harvey P. Dale_, Jan 14 2019 *)

%o (PARI) a(n) = sigma(5*n) % 6; \\ _Michel Marcus_, Mar 08 2014

%Y Cf. A000203, A084301, A112765.

%K nonn

%O 1,10

%A _Labos Elemer_, Aug 23 2004

%E Definition clarified by _Harvey P. Dale_, Jan 14 2019