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

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 (reinermartin(AT)hotmail.com), 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 18 14:11 EST 2022. Contains 350455 sequences. (Running on oeis4.)