cp's OEIS Frontend

A096628 Integers k for which {prime(1), prime(2), ..., prime(k)} (mod 4) is biased towards 1.

%I A096628 #19 Feb 16 2025 08:32:53
%S A096628 2946,50378,50380,50382,50383,50384,50385,50386,50387,50388,50389,
%T A096628 50390,50391,50392,50414,50415,50416,50417,50418,50419,50420,50421,
%U A096628 50422,50424,50426,50428,50430,50436,50438,50446,50447,50448,50450
%N A096628 Integers k for which {prime(1), prime(2), ..., prime(k)} (mod 4) is biased towards 1.
%C A096628 Indices of negative terms in A038698. - _Jianing Song_, Feb 20 2019
%H A096628 Robert Israel, <a href="/A096628/b096628.txt">Table of n, a(n) for n = 1..7804</a>
%H A096628 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ChebyshevBias.html">Chebyshev Bias</a>
%p A096628 R:= NULL: count:= 0: v:= 0: p:= 2:
%p A096628 for i from 2 while count < 100 do
%p A096628   p:= nextprime(p);
%p A096628   if p mod 4 = 3 then v:= v+1
%p A096628   else v:= v-1
%p A096628   fi;
%p A096628   if v < 0 then R:= R,i; count:= count+1 fi
%p A096628 od:
%p A096628 R; # _Robert Israel_, Apr 17 2023
%Y A096628 Cf. A007350, A038691, A038698, A051024, A051025, A066520, A199547.
%K A096628 nonn
%O A096628 1,1
%A A096628 _Eric W. Weisstein_, Jul 01 2004