OFFSET
1,1
COMMENTS
EXAMPLE
p=13, 2^13 - 13 = 8179 is prime.
PROG
(PARI) lista(nn) = forprime(p=2, nn, if(ispseudoprime(2^p - p), print1(p, ", ")))
CROSSREFS
KEYWORD
hard,more,nonn
AUTHOR
Iain Fox, Nov 14 2017
STATUS
approved