A049080 Primes prime(k) for which A049076(k) = 4.

11, 277, 1063, 2221, 3001, 4397, 7193, 9319, 10631, 12763, 15823, 21179, 22093, 24859, 30133, 33967, 37217, 38833, 40819, 43651, 55351, 57943, 60647, 66851, 68639, 77431, 80071, 84347, 90023, 98519, 101701, 103069, 125113, 127643

Offset: 1

Author

Neil Fernandez

Keywords

• nonn

Links

• Jens Kruse Andersen, Table of n, a(n) for n = 1..10000
• N. Fernandez, An order of primeness, F(p)
• N. Fernandez, An order of primeness [cached copy, included with permission of the author]

Crossrefs

Cf. A049076, A007821, A049078, A049079, A049081, A058322, A058324, A058325, A058326, A058327, A058328, A093046, A006450.

Programs

Maple

A049080 := proc(n)
        ithprime(A049079(n)) ;
end proc: # R. J. Mathar, Jul 07 2012

Mathematica

Nest[ Prime, Select[ Range[50], !PrimeQ[ # ] &], 4] (* Robert G. Wilson v, Mar 15 2004 *)