login
Primes for which A049076(p) = 7.
20

%I #15 Mar 15 2020 21:34:02

%S 127,15299,87803,219613,318211,506683,919913,1254739,1471343,1828669,

%T 2364361,3338989,3509299,4030889,5054303,5823667,6478961,6816631,

%U 7220981,7807321,10311439,10875143,11469013,12838937,13243033,15239333,15837299,16827557,18143603

%N Primes for which A049076(p) = 7.

%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]

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

%p A058322 := proc(n)

%p ithprime(A049081(n)) ;

%p end proc: # _R. J. Mathar_, Jul 07 2012

%p # second Maple program:

%p map(ithprime@@6, remove(isprime, [$1..42]))[]; # _Alois P. Heinz_, Mar 15 2020

%t Nest[ Prime, Select[ Range[40], !PrimeQ[ # ] &], 6] (* _Robert G. Wilson v_, Mar 15 2004 *)

%Y Cf. A049076, A007821, A049078, A049079, A049080, A049081, A058324, A058325, A058326, A058327, A058328, A093046, A006450.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Dec 12 2000

%E More terms from _Alois P. Heinz_, Mar 15 2020