A384456 Positive integers k such that (2^k - 1)^k + 2 is prime.

1, 2, 4, 8, 16, 40

Offset

1,2

Comments

If it exists, a(7) > 800. - Hugo Pfoertner, Jun 03 2025

Links

Table of n, a(n) for n=1..6.

Mathematica

Select[Range[100], PrimeQ[(2^#-1)^#+2] &] (* Stefano Spezia, Jun 01 2025 *)

Prog

(PARI) isok(k) = ispseudoprime((2^k - 1)^k + 2); \\ Michel Marcus, May 30 2025

Crossrefs

Cf. A019434.

Sequence in context: A162428 A344491 A028497 * A197244 A350495 A337581

Adjacent sequences: A384453 A384454 A384455 * A384457 A384458 A384459

Keyword

nonn,more

Author

Thomas Ordowski, May 30 2025

Status

approved