A119386 Numbers k such that 2^(2*k) - (2*k-1) is prime.
0, 1, 2, 3, 8, 9, 27, 29, 50, 60, 252, 651, 1617, 7374, 8051, 11391, 17328, 32382, 35433, 97470
Offset: 1
Crossrefs
Cf. A100102.
Programs
-
Mathematica
Select[Range[0,2000],PrimeQ[2^(2#)-(2#-1)]&] (* Harvey P. Dale, May 20 2012 *)
-
PARI
for(x=0,1000,if(isprime(2^(2*x)-(2*x-1)),print1(x,",")))
Extensions
a(14)-a(17) from Amiram Eldar, Dec 01 2021
a(18)-a(19) from Michael S. Branicky, May 15 2023
a(20) from Michael S. Branicky, Jan 07 2025
Comments