|
|
A303371
|
|
Numbers k such that prime(k)^k + 2 is prime.
|
|
1
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
select( n-> isprime(ithprime(n)^n + 2), [$(1..333)]) # M. F. Hasler, May 21 2018
|
|
PROG
|
(PARI) select( is(n)=ispseudoprime(prime(n)^n+2), [1..333])
L=500; for(n=1, oo, is(n)&&print1(n", "); n<L||print1([n])||L+=500)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|