[go: up one dir, main page]

login
A057851
Primes p such that order of primeness A049076(p) is > 9.
12
52711, 648391, 9737333, 37139213, 174440041, 326851121, 718064159, 997525853, 1559861749, 2724711961, 3657500101, 5545806481, 7069067389, 8012791231, 9672485827, 12501968177, 16123689073, 16917026909, 22742734291
OFFSET
1,1
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 [cached copy, included with permission of the author]
MATHEMATICA
Nest[ Prime, Range[35], 9] (* Robert G. Wilson v, Mar 15 2004 *)
PROG
(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
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Nov 10 2000
STATUS
approved