%I A078766
%S A078766 0,1,3,4,8,5,13,11,16,12,29,15,36,23,30,31,58,28,68,37,54,47,96,43,95,
%T A078766 64,92,67,141,52,158,97,120,100,146,83,217,124,158,115,259,96,279,151,
%U A078766 180,169,326,135,310,168,258,203,402,164,327,217,309,257,480,162,511
%N A078766 Number of primes less than n*phi(n).
%e A078766 phi(3)=2 and pi(2*3)=3, hence a(3)=3
%o A078766 (PARI) for (n=1,100, ep=n*eulerphi(n); pc=0; forprime (p=2,ep,pc++); 
               print1(pc","))
%Y A078766 Sequence in context: A086850 A050274 A057926 this_sequence A050417 A074212 
               A125715
%Y A078766 Adjacent sequences: A078763 A078764 A078765 this_sequence A078767 A078768 
               A078769
%K A078766 nonn
%O A078766 1,3
%A A078766 Jon Perry (perry(AT)globalnet.co.uk), Jan 09 2003