%I A064175
%S A064175 2,3,4,5,7,9,11,13,16,17,19,23,24,25,29,30,31,37,40,41,42,43,47,49,53,
%T A064175 54,56,59,60,61,66,67,70,71,72,73,78,79,81,83,84,88,89,90,96,97,101,
%U A064175 102,103,104,105,107,108,109,110,113,114,121,126,127,128,130,131,132
%N A064175 Numbers n such that infinitary Moebius function of n (A064179) equals 
               -1.
%D A064175 J. Lambek and L. Moser, On some two way classifications of integers, 
               Canad. Math. Bull. 2 (1959), 85-89.
%D A064175 J. Roberts, Lure of the Integers, Math. Assoc. America, 1992, p. 22.
%H A064175 T. D. Noe, <a href="b064175.txt">Table of n, a(n) for n=1..10000</a>
%e A064175 mu[60]=0 but iMoebiusMu[60]=-1 because 60 = 2^2 *3^1 *5^1 and the binary 
               digits of 2 and 1 and 1 add up to 3, an odd number.
%t A064175 iMoebiusMu[ n_ ] := Switch[ MoebiusMu[ n ], 1, 1, -1, -1, 0, If[ OddQ[ 
               Plus@@(DigitCount[ Last[ Transpose[ FactorInteger[ n ] ] ], 2, 1 
               ]) ], -1, 1 ] ];
%Y A064175 Complement of A064176. Cf. A000028, A000379.
%Y A064175 Sequence in context: A008732 A130520 A005706 this_sequence A000028 A026416 
               A123193
%Y A064175 Adjacent sequences: A064172 A064173 A064174 this_sequence A064176 A064177 
               A064178
%K A064175 nonn,nice,easy
%O A064175 1,1
%A A064175 Wouter Meeussen (wouter.meeussen(AT)pandora.be), Sep 17 2001