# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a057850 Showing 1-1 of 1 %I A057850 #35 Nov 17 2024 20:35:17 %S A057850 5381,52711,648391,2269733,9737333,17624813,37139213,50728129, %T A057850 77557187,131807699,174440041,259336153,326851121,368345293,440817757, %U A057850 563167303,718064159,751783477,997525853,1107276647,1170710369,1367161723 %N A057850 Primes p whose order of primeness A078442(p) is at least 8. %C A057850 Union of A058325-A058328, A093046 etc. - _R. J. Mathar_, Jul 07 2012 %H A057850 Robert G. Wilson v, Table of n, a(n) for n = 1..11457 %H A057850 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. %H A057850 N. Fernandez, An order of primeness, F(p) %H A057850 N. Fernandez, An order of primeness [cached copy, included with permission of the author] %F A057850 a(n) = A049090(A049090(n)). - _James G. Merickel_, Feb 14 2010 %F A057850 a(n) = A000040(A057849(n)). - _R. J. Mathar_, Jul 07 2012 %t A057850 Nest[ Prime, Range[35], 8] (* _Robert G. Wilson v_, Mar 15 2004 *) %o A057850 (PARI) list(lim)=my(v=List(), q, r, s, t, u, vv, w); forprime(p=2, lim, if(isprime(q++) && isprime(r++) && isprime(s++) && isprime(t++) && isprime(u++) && isprime(vv++) && isprime(w++), listput(v, p))); Vec(v) \\ _Charles R Greathouse IV_, Feb 19 2017 %Y A057850 Cf. A078442, A000040, A006450, A038580, A049090, A049203, A049202, A057849, A057851, A057847, A058332, A093047. %K A057850 nonn %O A057850 1,1 %A A057850 _Robert G. Wilson v_, Nov 10 2000 %E A057850 Name clarified by _Andrew Howroyd_, Nov 17 2024 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE