The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A053872 Primes arising in A053782. 3
 37, 199, 277, 367, 997, 1049, 1103, 1451, 1709, 1777, 2137, 2213, 2953, 3041, 3407, 3889, 3989, 4091, 5309, 7193, 7883, 11113, 13757, 15083, 16073, 17093, 28643, 28909, 30259, 32203, 35089, 35977, 40879, 42157, 43451, 43777, 48119, 51949 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Chai Wah Wu, Table of n, a(n) for n = 1..10000 MATHEMATICA s=0; lst={}; Do[If[PrimeQ[n], NULL, s+=n; If[PrimeQ[s], AppendTo[lst, s]]], {n, 2, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Feb 01 2009 *) PROG (Python) from python import isprime A053872_list, n, m, s = [], 1, 4, 4 while len(A053872_list) < 10000: if isprime(s): A053872_list.append(s) m += 1 if isprime(m): m += 1 n += 1 s += m # Chai Wah Wu, May 13 2018 (PARI) lista(nn) = {my(s = 0); forcomposite(c=1, nn, s += c; if (isprime(s), print1(s, ", ")); ); } \\ Michel Marcus, May 13 2018 CROSSREFS Cf. A000040, A002808, A053782. Sequence in context: A140027 A109320 A221571 * A141954 A211734 A211745 Adjacent sequences: A053869 A053870 A053871 * A053873 A053874 A053875 KEYWORD nonn AUTHOR G. L. Honaker, Jr., Mar 30 2000 EXTENSIONS More terms from Reiner Martin, Jul 17 2001 STATUS approved

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

Last modified July 24 10:37 EDT 2024. Contains 374583 sequences. (Running on oeis4.)