%I #8 Feb 27 2013 16:29:58

%S 1,1,0,3,1,2,2,1,3,0,1,4,2,3,3,2,4,1,0,7,1,6,2,5,5,2,6,1,7,0,2,7,4,5,

%T 5,4,7,2,0,11,1,10,3,8,5,6,6,5,8,3,10,1,11,0,3,10,4,9,5,8,8,5,9,4,10,

%U 3,1,14,2,13,4,11,7,8,8,7,11,4,13,2,14,1

%N Pairs of numbers (a,b) such that a + b*I is a first-quadrant Gaussian prime, ordered by a+b and then a.

%C Gaussian primes on the positive real and imaginary axes are included. Note that the primes are ordered by their taxicab distance from the origin.

%H T. D. Noe, <a href="/A222593/b222593.txt">Table of n, a(n) for n = 1..1662</a> (taxicab distance less than 100)

%t nn = 20; t = {}; Do[If[PrimeQ[i + (j - i) I, GaussianIntegers -> True], AppendTo[t, {i, j-i}]], {j, 0, nn}, {i, 0, j}]; Flatten[t]

%Y Cf. A218858, A218859 (number of Gaussian primes at taxicab distance n).

%K nonn

%O 1,4

%A _T. D. Noe_, Feb 27 2013