%I #9 Jun 24 2014 14:18:34
%S 0,1,1,1,1,5,2,2,2,8,3,9,4,10,10,6,6,12,7,13,13,13,10,14,11,15,12,16,
%T 13,29,14,14,20,20,20,20,18,21,21,21,21,40,22,24,24,24,25,25,26,26,26,
%U 26,29,27,27,27,27,27,34,57,35,30,30,37,31,62,39,33,33,65,42,35,43,36
%N Card{ k<=n | omega(k)!=omega(n) }, where omega(n) = A001221(n).
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Erdos-KacTheorem.html">Erdos-Kac theorem</a>
%F lim a(n)/n = 1. This follows from the Erdos-Kac theorem on the distribution of values of omega(n) - see the Weisstein link. - _Dean Hickerson_, Jan 29 2006
%o (PARI) for(n=1,200,print1(sum(i=1,n,if(omega(n)==omega(i),0,1)),","))
%K nonn
%O 1,6
%A _Benoit Cloitre_, May 16 2002
%E Definition corrected by _Franklin T. Adams-Watters_, Jan 29 2006
|