%I A071841
%S A071841 0,0,0,0,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,
%T A071841 3,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,5,5,5,5,5,5,5,5,6,6,6,6,6,6,6,6,6,6,
%U A071841 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,7,7,7,7,7
%N A071841 Number of primes == 5 mod 8 <= n.
%o A071841 (PARI) for(n=1,200,print1(sum(i=1,n,if((i*isprime(i)-5)%8,0,1)),","))
%Y A071841 Sequence in context: A097430 A054900 A046042 this_sequence A097876 A111859 
               A156822
%Y A071841 Adjacent sequences: A071838 A071839 A071840 this_sequence A071842 A071843 
               A071844
%K A071841 easy,nonn
%O A071841 1,13
%A A071841 Benoit Cloitre (benoit7848c(AT)orange.fr), Jun 08 2002