|
|
A359436
|
|
Primes p such that (4^p - 2^p + 1)/3 is prime.
|
|
0
|
|
|
3, 5, 7, 13, 29, 61, 383, 401, 1637, 1871, 36229, 44771, 44797, 75167
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Terms > 1871 correspond to probable primes.
|
|
LINKS
|
|
|
EXAMPLE
|
3 is a term because 3 is prime and (4^3 - 2^3 + 1)/3 = 19 is also prime.
|
|
PROG
|
(PARI) isok(p)={isprime(p) && p>2 && ispseudoprime((4^p - 2^p + 1)/3)}
{ forprime(p=3, 2000, if(isok(p), print1(p, ", "))) } \\ Andrew Howroyd, Dec 31 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more,hard
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|