login
A316360
Numbers k such that (2^k-2)^2-3 is prime.
0
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
OFFSET
1,1
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 *)
PROG
(PARI) is(n)=ispseudoprime((2^n-2)^2-3)
(Magma) [n: n in [2..750] |IsPrime((2^n - 2)^2 - 3)]; // Vincenzo Librandi, Jul 01 2018
CROSSREFS
Sequence in context: A285374 A132457 A311080 * A311081 A311082 A311083
KEYWORD
nonn,more
AUTHOR
EXTENSIONS
a(26) from Giovanni Resta, Jul 02 2018
STATUS
approved