Thanks to everyone who made a donation during our annual appeal! To see the list of donors, or make a donation, see the OEIS Foundation home page.
1,2
Table of n, a(n) for n=1..31.
Index entries for Gaussian integers and primes
Do[ If[ PrimeQ[ n * (1 + I)^n + 1], Print[n] ], {n, 1, 4000} ]
Sequence in context: A051236 A003218 A119002 * A049910 A077643 A123389
Adjacent sequences: A058767 A058768 A058769 * A058771 A058772 A058773
nonn,hard
Robert G. Wilson v, Jan 02 2001
approved