%I #12 Jun 24 2022 19:57:19
%S 1,0,-1,-2,0,3,8,13,21,34,47,64,84,105,128,156,189,223,262,303,344,
%T 390,439,493,554,617,681,748,815,884,966,1051,1140,1230,1329,1429,
%U 1534,1643,1755,1872,1994,2117,2248,2379,2513,2648,2794,2951,3110,3270,3433,3600,3767,3943,4124,4310,4501,4692,4888
%N "Sum of n first primes" minus "sum of first n nonprimes".
%F a(n) = A007504(n) - A051349(n). Cf. A024850.
%F Partial sums of A014237.
%o (PARI) for(n=1, 100, s=2; while(sum(i=1, s, 1-isprime(i))<n, s++); print1(-sum(k=1, s, (1-is prime(k))*k)+sum(k=1, n, prime(k)), ", "))
%K easy,sign
%O 1,4
%A _Benoit Cloitre_, Jun 23 2002
%E Corrected and edited by _Jaroslav Krizek_, Jun 17 2009