A057851 Primes p whose order of primeness A078442(p) is at least 9.
52711, 648391, 9737333, 37139213, 174440041, 326851121, 718064159, 997525853, 1559861749, 2724711961, 3657500101, 5545806481, 7069067389, 8012791231, 9672485827, 12501968177, 16123689073, 16917026909, 22742734291
Offset: 1
Keywords
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 1381 terms from Robert G. Wilson v)
- N. Fernandez, An order of primeness, F(p)
- N. Fernandez, An order of primeness [cached copy, included with permission of the author]
Crossrefs
Programs
-
Mathematica
Nest[ Prime, Range[35], 9] (* Robert G. Wilson v, Mar 15 2004 *)
-
PARI
list(lim)=my(v=List(), q, r, s, t, u, vv, w, x); forprime(p=2, lim, if(isprime(q++) && isprime(r++) && isprime(s++) && isprime(t++) && isprime(u++) && isprime(vv++) && isprime(w++) && isprime(x++), listput(v, p))); Vec(v) \\ Charles R Greathouse IV, Feb 19 2017
Extensions
Name clarified by Andrew Howroyd, Nov 17 2024