A091101 Number of first-quadrant Gaussian primes whose norm is less than 10^n.
5, 27, 173, 1245, 9635, 78525, 664811, 5762247, 50850399, 455056167
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, lim1}]; cnt, {n, 6}]