OFFSET
1,3
COMMENTS
In the first quadrant and on or below the first diagonal, means here that the imaginary part is nonnegative and inferior or equal to the real part.
The norm used is the absolute value of the Gaussian integers, seen as complex numbers : sqrt( re(z)^2 + im(z)^2).
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
MATHEMATICA
nn = 100; t = Select[Flatten[Table[a + b*I, {a, 0, nn}, {b, a, nn}]], PrimeQ[#, GaussianIntegers -> True] &]; t2 = Table[0, {nn}]; Do[f = Ceiling[Abs[i]]; If[f <= nn, t2[[f]]++], {i, t}]; Accumulate[t2] (* T. D. Noe, Aug 19 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Olivier Gérard, Aug 17 2013
STATUS
approved