This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A053767 Sum of first n composite numbers. 17
 0, 4, 10, 18, 27, 37, 49, 63, 78, 94, 112, 132, 153, 175, 199, 224, 250, 277, 305, 335, 367, 400, 434, 469, 505, 543, 582, 622, 664, 708, 753, 799, 847, 896, 946, 997, 1049, 1103, 1158, 1214, 1271, 1329, 1389, 1451, 1514, 1578, 1643, 1709, 1777, 1846, 1916, 1988 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS a(A196415(n)) = A036691(A196415(n)) / A141092(n). - Reinhard Zumkeller, Oct 03 2011 LINKS Reinhard Zumkeller, Table of n, a(n) for n = 0..10000 C. Rivera, See also FORMULA a(n) = A000217(A002808(n)) - A034387(A002808(n)) - 1 . - Robert Israel, Jan 09 2015 a(n) = A051349(n+1) - 1. - Michel Marcus, Feb 16 2018 MAPLE A053767 := proc(n)         add(A002808(i), i=1..n) ; end proc: # R. J. Mathar, Oct 03 2011 ListTools[PartialSums](remove(isprime, [\$2..1000])); # Robert Israel, Jan 09 2015 MATHEMATICA lst={}; s=0; Do[If[ !PrimeQ[n], s=s+n; AppendTo[lst, s]], {n, 2, 10^2}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 14 2008 *) Accumulate[Complement[Range[2, 100], Prime[Range[PrimePi[100]]]]] (* Harvey P. Dale, Dec 28 2010 *) Accumulate[Select[Range[2, 100], ! PrimeQ[#] &]] PROG (Haskell) a053767 n = a053767_list !! (n-1) a053767_list = scanl1 (+) a002808_list -- Reinhard Zumkeller, Oct 03 2011 (PARI) lista(nn) = {my(s=0); forcomposite(n=0, nn, print1(s, ", "); s += n; ); } \\ Michel Marcus, Jan 09 2015 CROSSREFS Cf. A002808, A051349. First differences of A023539. Sequence in context: A113804 A107372 A113420 * A225270 A073621 A048218 Adjacent sequences:  A053764 A053765 A053766 * A053768 A053769 A053770 KEYWORD nonn AUTHOR G. L. Honaker, Jr., Mar 29 2000 EXTENSIONS a(0)=0 prepended by Max Alekseyev, Feb 10 2018 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 20 02:10 EDT 2019. Contains 328244 sequences. (Running on oeis4.)