A384456 Positive integers k such that (2^k - 1)^k + 2 is prime.
1, 2, 4, 8, 16, 40
Offset: 1
Crossrefs
Cf. A019434.
Programs
-
Mathematica
Select[Range[100],PrimeQ[(2^#-1)^#+2] &] (* Stefano Spezia, Jun 01 2025 *)
-
PARI
isok(k) = ispseudoprime((2^k - 1)^k + 2); \\ Michel Marcus, May 30 2025
Comments