1,2
No more under 2000.
Flatten[Position[Table[PrimeQ[4^n + 9 I], {n, 1, 2000}], True]]
Sequence in context: A057887 A202116 A006049 * A113050 A015927 A097110
Adjacent sequences: A084538 A084539 A084540 * A084542 A084543 A084544
hard,nonn
Ed Pegg Jr (ed(AT)mathpuzzle.com), May 29 2003