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

 

Logo
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
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
Sequence in context: A140027 A109320 A221571 * A141954 A211734 A211745
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.

License Agreements, Terms of Use, Privacy Policy. .

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