OFFSET
1,2
COMMENTS
See A178652.
EXAMPLE
4^1 + 13^2 = 173 = prime(40), 1 is first term.
4^3 + 13^2 = 233 = prime(51), 3 is 2nd term.
4^5 + 13^2 = 1193 = prime(196), 5 is 3rd term.
4^147 + 13^2 = 318286...15753 (89 digits), 147 is 14th term.
4^197 + 13^2 = 403...9753 (119 digits), 197 is 15th term.
MATHEMATICA
fQ[n_] := PrimeQ[(2^k)^2 + 169]; k = 1; lst = {}; While[k < 10^4, If[ fQ@k, AppendTo[lst, k]; Print@k]; k += 2]; lst (* Robert G. Wilson v, Jul 31 2010 *)
PROG
(PARI) forstep(k=1, 999, 2, if(ispseudoprime(4^n+169), print1(n", "))) \\ Charles R Greathouse IV, Aug 27 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Eva-Maria Zschorn (e-m.zschorn(AT)zaschendorf.km3.de), Jun 01 2010
EXTENSIONS
a(16)-a(31) from Robert G. Wilson v, Jul 31 2010
New name from Charles R Greathouse IV, Aug 27 2013
STATUS
approved