cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A228235 Number of Gaussian primes of norm less than or equal to n in the first quadrant on or below the first diagonal.

This page as a plain text file.
%I A228235 #12 Apr 25 2024 14:34:11
%S A228235 0,1,3,4,5,6,9,11,12,14,18,19,21,24,25,28,32,35,39,42,46,49,52,55,60,
%T A228235 64,67,72,76,80,85,90,94,100,105,110,114,119,123,126,133,140,144,151,
%U A228235 156,162,168,176,184,189,193,201,210,216,221,228,235,241,250,257
%N A228235 Number of Gaussian primes of norm less than or equal to n in the first quadrant on or below the first diagonal.
%C A228235 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.
%C A228235 The norm used is the absolute value of the Gaussian integers, seen as complex numbers : sqrt( re(z)^2 + im(z)^2).
%H A228235 T. D. Noe, <a href="/A228235/b228235.txt">Table of n, a(n) for n = 1..1000</a>
%t A228235 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 *)
%Y A228235 Cf. A228172 (number of Gaussian integers in this half-quadrant).
%Y A228235 Cf. A228234 (version of this sequence excluding the real axis).
%Y A228235 Cf. A228232, A228233 (versions counting the whole first quadrant).
%K A228235 nonn
%O A228235 1,3
%A A228235 _Olivier Gérard_, Aug 17 2013