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 A163061 #7 Jun 14 2019 18:44:05 %S A163061 2,6,15,28,47,69,96,127,164,208,255,310,371,435,504,581,665,752,846, %T A163061 945,1048,1159,1275,1398,1530,1667,1808,1954,2103,2258,2429,2605,2788, %U A163061 2975,3173,3374,3582,3797,4018,4246,4481,4719,4968,5221,5480,5742 %N A163061 Sum of the first n primes plus the first n nonprimes. %H A163061 Harvey P. Dale, <a href="/A163061/b163061.txt">Table of n, a(n) for n = 1..1000</a> %F A163061 a(n)=A007504(n)+A051349(n-1). %e A163061 a(1)=2+0=2. a(2)=5+1=6. a(3)=10+5=15. a(4)=17+11=28. a(5)=28+19=47. a(6)=41+28=69. a(7)=58+38=96. %t A163061 Module[{nn=80,np,len},np=Select[Range[0,nn],!PrimeQ[#]&];len=Length[np];Total/@ Thread[{Accumulate[np],Accumulate[Prime[Range[len]]]}]] (* _Harvey P. Dale_, Jun 14 2019 *) %Y A163061 Cf. A000040, A141468, A007504, A051349. %K A163061 nonn %O A163061 1,1 %A A163061 _Juri-Stepan Gerasimov_, Jul 21 2009 %E A163061 Formula index corrected, 1119 replaced by 1159 - _R. J. Mathar_, Jul 27 2009