%I A070962
%S A070962 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 A070962 13,29,14,14,20,20,20,20,18,21,21,21,21,40,22,24,24,24,25,25,26,26,26,
%U A070962 26,29,27,27,27,27,27,34,57,35,30,30,37,31,62,39,33,33,65,42,35,43,36
%N A070962 Card{ k<=n | omega(k)!=omega(n) }, where omega(n) = A001221(n).
%H A070962 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
Erdos-KacTheorem.html">Erdos-Kac theorem</a>
%F A070962 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 A070962 (PARI) for(n=1,200,print1(sum(i=1,n,if(omega(n)==omega(i),0,1)),","))
%Y A070962 Sequence in context: A129165 A081119 A119320 this_sequence A090125 A093008
A161462
%Y A070962 Adjacent sequences: A070959 A070960 A070961 this_sequence A070963 A070964
A070965
%K A070962 nonn
%O A070962 1,6
%A A070962 Benoit Cloitre (benoit7848c(AT)orange.fr), May 16 2002
%E A070962 Definition corrected by Frank Adams-Watters (FrankTAW(AT)Netscape.net),
Jan 29 2006
|