A049202 - OEIS

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

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A049202

Primes p whose order of primeness A049076(p) is >= 6.

127, 709, 5381, 15299, 52711, 87803, 167449, 219613, 318211, 506683, 648391, 919913, 1128889, 1254739, 1471343, 1828669, 2269733, 2364361, 3042161, 3338989, 3509299, 4030889, 4535189, 5054303, 5823667, 6478961, 6816631

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Union of A058322, A058324-A058328, A093046 etc.

LINKS

Michael De Vlieger, Table of n, a(n) for n = 1..10000 (first 1000 terms from Robert G. Wilson v)

R. G. Batchko, A prime fractal and global quasi-self-similar structure in the distribution of prime-indexed primes, arXiv preprint arXiv:1405.2900 [math.GM], 2014.

N. Fernandez, An order of primeness, F(p)

N. Fernandez, An order of primeness [cached copy, included with permission of the author]

MAPLE

map(ithprime@@4, select(isprime, [$1..137])); # Peter Luschny, Feb 17 2014

MATHEMATICA

Nest[ Prime, Range[35], 6] (* Robert G. Wilson v, Mar 15 2004 *)

PROG

(PARI) list(lim)=my(v=List(), q, r, s, t, u); forprime(p=2, lim, if(isprime(q++) && isprime(r++) && isprime(s++) && isprime(t++) && isprime(u++), listput(v, p))); Vec(v) \\ Charles R Greathouse IV, Feb 16 2017

CROSSREFS

Cf. A049076, A000040, A006450, A038580, A049090, A049203, A057849, A057850, A057851, A057847, A058332, A093047.

Sequence in context: A299890 A200813 A332574 * A204737 A060201 A140630

Adjacent sequences: A049199 A049200 A049201 * A049203 A049204 A049205

KEYWORD

nonn

AUTHOR

Neil Fernandez

EXTENSIONS

More terms from Robert G. Wilson v, Nov 10 2000

Name corrected by Sean A. Irvine, Jul 21 2021

STATUS

approved