A049090 Primes for which A049076 >= 4.

11, 31, 127, 277, 709, 1063, 1787, 2221, 3001, 4397, 5381, 7193, 8527, 9319, 10631, 12763, 15299, 15823, 19577, 21179, 22093, 24859, 27457, 30133, 33967, 37217, 38833, 40819, 42043, 43651, 52711, 55351, 57943, 60647, 66851, 68639, 72727

Offset

1,1

Comments

Union of A049080, A049081, A058322, A058324, etc. - R. J. Mathar, Jul 07 2012

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]

N. Fernandez, More terms of this and other sequences related to A049076.

Formula

a(n) = A006450(A006450(n)). - James G. Merickel, Feb 14 2010

a(n) = A000040(A038580(n)). - R. J. Mathar, Jul 07 2012

a(n) ~ n (log n)^4. - Charles R Greathouse IV, Feb 16 2017

Maple

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

Mathematica

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

Prog

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

Crossrefs

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

Sequence in context: A152220 A272263 A082712 * A181150 A094622 A193645

Adjacent sequences: A049087 A049088 A049089 * A049091 A049092 A049093

Keyword

nonn

Author

Neil Fernandez

Extensions

Name corrected by Sean A. Irvine, Jul 18 2021

Status

approved