A301524 Numbers k such that 16*k^k - 1 is prime.

3, 5, 15, 27

Offset: 1

Author

Seiichi Manyama, Mar 23 2018

Keywords

• nonn
• more

Comments

All terms are odd since 16*(2*m)^(2*m) - 1 = (2^(m+2)*m^m - 1)*(2^(m+2)*m^m + 1). - Altug Alkan, Mar 23 2018

a(5), if it exists, is greater than 5000. - Vaclav Kotesovec, Mar 25 2018

a(5), if it exists, is greater than 20000. - Michael S. Branicky, Sep 03 2024

Crossrefs

Cf. A110931, A301522.

Programs

Mathematica

Select[Range[1000], PrimeQ[16*#^# - 1] &] (* Vaclav Kotesovec, Mar 25 2018 *)

PARI

for(n=0, 1000, if(isprime(16*n^n-1), print1(n", ")))