A178652 Primes of the form 4^k + 13^2.
173, 233, 1193, 16553, 262313, 67109033, 1073741993, 4611686018427388073, 73786976294838206633, 19807040628566084398385987753, 1361129467683753853853498429727072845993
Offset: 1
Keywords
Examples
a(1) = 4^1 + 13^2 = 173. a(2) = 4^3 + 13^2 = 233. a(11) = 4^65 + 13^2 = 1361129467683753853853498429727072845993. a(12) = 4^99 + 13^2 = 401734511064747568885490523085290650630550748445698208825513.
Programs
-
Mathematica
Select[4^Range[0,70]+13^2,PrimeQ] (* Harvey P. Dale, Mar 05 2015 *)
-
PARI
forstep(n=1,999,2,if(ispseudoprime(t=4^n+169),print1(t", "))) \\ Charles R Greathouse IV, Aug 27 2013
Extensions
New name from Charles R Greathouse IV, Aug 27 2013
Comments