A058322 Primes for which A049076(p) = 7.

127, 15299, 87803, 219613, 318211, 506683, 919913, 1254739, 1471343, 1828669, 2364361, 3338989, 3509299, 4030889, 5054303, 5823667, 6478961, 6816631, 7220981, 7807321, 10311439, 10875143, 11469013, 12838937, 13243033, 15239333, 15837299, 16827557, 18143603

Offset: 1

Author

Robert G. Wilson v, Dec 12 2000

Keywords

• nonn

Links

• 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, A049080, A049081, A058324, A058325, A058326, A058327, A058328, A093046, A006450.

Programs

Maple

A058322 := proc(n)
        ithprime(A049081(n)) ;
end proc: # R. J. Mathar, Jul 07 2012
# second Maple program:
map(ithprime@@6, remove(isprime, [$1..42]))[];  # Alois P. Heinz, Mar 15 2020

Mathematica

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

Formula

a(n) = A000040(A049081(n)).

Extensions

More terms from Alois P. Heinz, Mar 15 2020