A091102 Number of first half-quadrant Gaussian primes whose norm is less than 10^n.
3, 14, 87, 623, 4818, 39263, 332406, 2881124, 25425200, 227528084
Offset: 1
Links
- Eric Weisstein's World of Mathematics, Gaussian Prime
- Index entries for Gaussian integers and primes
Crossrefs
Programs
-
Mathematica
Table[lim2=10^n; lim1=Floor[Sqrt[lim2]]; cnt=0; Do[If[x^2+y^2
True], cnt++ ], {x, 0, lim1}, {y, 0, x}]; cnt, {n, 6}]