A301520 Numbers k such that 4*k^k + 3 is prime.

0, 1, 2, 5, 10, 44, 65, 1424

Offset

1,3

Comments

Next term, if it exists, is greater than 5000. - Vaclav Kotesovec, Mar 25 2018

Next term, if it exists, is greater than 25000. - Robert Price, Apr 22 2019

Links

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

Mathematica

Flatten[{0, Select[Range[1000], PrimeQ[4*#^# + 3] &]}] (* Vaclav Kotesovec, Mar 25 2018 *)

Prog

(PARI) for(n=0, 100, if(isprime(4*n^n+3), print1(n", ")))

Crossrefs

Cf. A110932, A160360, A301519, A301521.

Sequence in context: A018439 A349449 A018451 * A330967 A139010 A018472

Adjacent sequences: A301517 A301518 A301519 * A301521 A301522 A301523

Keyword

nonn,hard,more

Author

Seiichi Manyama, Mar 23 2018

Extensions

a(8) from Vaclav Kotesovec, Mar 25 2018

Status

approved