A316360 Numbers k such that (2^k-2)^2-3 is prime.
4, 8, 12, 14, 18, 32, 62, 66, 96, 120, 122, 140, 180, 202, 228, 740, 800, 810, 1012, 1142, 1386, 1496, 1698, 4622, 5674, 54892, 75482
Offset: 1
Programs
-
Magma
[n: n in [2..750] |IsPrime((2^n - 2)^2 - 3)]; // Vincenzo Librandi, Jul 01 2018
-
Maple
select(k->isprime(4^k-2^(2+k)+1),[$ 1..3000]); # Muniru A Asiru, Jul 01 2018
-
Mathematica
Select[Range[3000], PrimeQ[(2^# - 2)^2 - 3] &] (* Michael De Vlieger, Jun 30 2018 *)
-
PARI
is(n)=ispseudoprime((2^n-2)^2-3)
Extensions
a(26) from Giovanni Resta, Jul 02 2018
a(27) from Michael S. Branicky, Nov 27 2024