%I A056811
%S A056811 0,0,0,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,3,3,3,3,
%T A056811 3,3,3,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,
%U A056811 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
%N A056811 Number of primes not exceeding square root of n: PrimePi[Sqrt(n)];.
%C A056811 Number of primes among factors of LCM[1,..,n] whose exponent is > 1, 
               i.e. number of non unitary prime factors of LCM[1,..,n].
%F A056811 a(n)=A056170[A003418)]=A000720[A000196(n)]
%e A056811 If n=169,...,288=p()^2,..,p(7)^2-1, then only the first 6 primes have 
               exponents larger than 1, resulting in powers: 128,81,125,49,121,169. 
               So a(n)=6 for as much as 288-169+1=120 values of n.
%Y A056811 A056170, A003418, A000720, A000196.
%Y A056811 Sequence in context: A082998 A076620 A121900 this_sequence A097430 A054900 
               A046042
%Y A056811 Adjacent sequences: A056808 A056809 A056810 this_sequence A056812 A056813 
               A056814
%K A056811 nonn
%O A056811 1,9
%A A056811 Labos E. (labos(AT)ana.sote.hu), Aug 28 2000