This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A120326 #14 Sep 17 2016 09:08:42 %S A120326 2,2,4,5,7,8,10,11,13,15,16,17,19,20,22,24,26,27,28,30,31,32,34,36,37, %T A120326 39,40,42,43,45,46,48,50,51,53,54,55,56,58,60,62,63,65,66,68,69,70,71, %U A120326 73,74,76,78,79,81,83,85,87,88,89,91,92,94,95,97,98,100,101,102,104,105 %N A120326 Cumulative sum of the remainders when dividing primes by 3. %C A120326 Partial sums of A039701. - _Michel Marcus_, Jan 21 2015 %H A120326 Harvey P. Dale, <a href="/A120326/b120326.txt">Table of n, a(n) for n = 1..1000</a> %F A120326 a(n) = sum_{k=1..n} (prime(k) mod 3). %t A120326 s=0;lst={};Do[p=Prime[n];m=Mod[p,3];a=(p-m)/3;AppendTo[lst,s+=m],{n,3*4!}];lst (* _Vladimir Joseph Stephan Orlovsky_, May 24 2009 *) %t A120326 Accumulate[Mod[Prime[Range[80]],3]] (* _Harvey P. Dale_, Sep 17 2016 *) %Y A120326 Cf. A039701 (prime(n) mod 3). %K A120326 nonn %O A120326 1,1 %A A120326 _Joost de Winter_, Aug 27 2006