A367478 Numbers k such that k^6*2^k - 1 is a prime.

37, 43, 167, 217, 239, 349, 581, 1297, 5183, 9119, 10589, 15205, 18745, 25687, 26609, 33667, 35663, 73603, 82501, 89269

Offset

1,1

Links

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

Mathematica

Select[Range[6000], PrimeQ[#^6*2^# - 1] &] (* Amiram Eldar, Nov 19 2023 *)

Prog

(Magma) [k: k in [1..1000] | IsPrime(k^6*2^k-1)];

Crossrefs

Numbers k such that k^m*2^k - 1 is a prime: A000043 (m = 0), A002234 (m = 1), A058781 (m = 2), A367037 (m = 3), A367102 (m = 4), A367464 (m = 5), this sequence (m = 6).

Sequence in context: A039950 A186281 A225423 * A322098 A039351 A043174

Adjacent sequences: A367475 A367476 A367477 * A367479 A367480 A367481

Keyword

nonn,more

Author

Juri-Stepan Gerasimov, Nov 19 2023

Extensions

a(12) inserted by and a(14)-a(17) from Michael S. Branicky, Nov 19 2023

a(18)-a(20) from Michael S. Branicky, Nov 21 2023

Status

approved