A103566 - OEIS

%I #15 Sep 01 2024 02:48:00

%S 1,3,4,6,7,9,11,12,13,15,16,18,20,22,23,24,26,27,28,30,32,33,35,36,38,

%T 39,41,42,44,46,47,49,50,51,52,54,56,58,59,61,62,64,65,66,67,69,70,72,

%U 74,75,77,79,81,83,84,85,87,88,90,91,93,94,96,97,98,100,101,103,105,106

%N Sum of the primes > 5 modulo 3.

%F a(n+1)-a(n) = A039701(n+4) (first differences).

%F a(n) = A120326(n+3) - 4. - _Jason Yuen_, Sep 01 2024

%t a = Table[Sum[Mod[Prime[i + 3], 3], {i, 1, n}], {n, 1, 200}]

%t Accumulate[Mod[Prime[Range[4,80]],3]] (* _Harvey P. Dale_, Aug 04 2013 *)

%Y Cf. A039701, A103567-A103572, A120326.

%K nonn,less,easy

%O 1,2

%A _Roger L. Bagula_, Mar 23 2005