OFFSET
1,3
COMMENTS
Strict means that one does not include the ordinary integer primes and integer primes multiplied by i.
In the first quadrant and on or below the first diagonal, means here that the imaginary part is positive and inferior or equal to the real part.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
MATHEMATICA
nn = 100; t = Select[Flatten[Table[a + b*I, {a, 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