A301641 Primes of form 4*k^k + 1.
5, 17, 109, 3294173, 355271367880050092935562133789062501
Offset: 1
Keywords
Crossrefs
Programs
-
Maple
a:=k->`if`(isprime(4*k^k+1),4*k^k+1,NULL): seq(a(k),k=1..1400); # Muniru A Asiru, Mar 25 2018
-
Mathematica
Select[Table[4n^n+1,{n,30}],PrimeQ] (* Harvey P. Dale, Oct 06 2023 *)
Comments