OFFSET
1,1
EXAMPLE
Prime(2^12)-prime(2^11) + 1 = 21011 is prime.
MATHEMATICA
Select[#[[2]]-#[[1]]+1&/@Partition[Prime[2^Range[0, 30]], 2, 1], PrimeQ] (* Harvey P. Dale, Jul 08 2021 *)
PROG
(PARI) f(n)= for(x=1, n, y=prime(2^x)-prime(2^(x-1))+1; if(isprime(y), print1(y", ")))
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Cino Hilliard, Feb 20 2004
EXTENSIONS
Corrected and edited by N. J. A. Sloane, following a suggestion from Harvey P. Dale, Jul 07 2021
a(10)-a(12) from Mohammed Yaseen, Jul 08 2021
STATUS
approved