|
%I #20 Mar 27 2015 23:21:29
%S 11,277,1063,2221,3001,4397,7193,9319,10631,12763,15823,21179,22093,
%T 24859,30133,33967,37217,38833,40819,43651,55351,57943,60647,66851,
%U 68639,77431,80071,84347,90023,98519,101701,103069,125113,127643
%N Primes prime(k) for which A049076(k) = 4.
%H Jens Kruse Andersen, <a href="/A049080/b049080.txt">Table of n, a(n) for n = 1..10000</a>
%H N. Fernandez, <a href="http://www.borve.org/primeness/FOP.html">An order of primeness, F(p)</a>
%H N. Fernandez, <a href="/A006450/a006450.html">An order of primeness</a> [cached copy, included with permission of the author]
%p A049080 := proc(n)
%p ithprime(A049079(n)) ;
%p end proc: # _R. J. Mathar_, Jul 07 2012
%t Nest[ Prime, Select[ Range[50], !PrimeQ[ # ] &], 4] (* _Robert G. Wilson v_, Mar 15 2004 *)
%Y Cf. A049076, A007821, A049078, A049079, A049081, A058322, A058324, A058325, A058326, A058327, A058328, A093046, A006450.
%K nonn
%O 1,1
%A _Neil Fernandez_
|
