|
| |
|
|
A064175
|
|
Numbers n such that infinitary Moebius function of n (A064179) equals -1.
|
|
3
| |
|
|
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, 54, 56, 59, 60, 61, 66, 67, 70, 71, 72, 73, 78, 79, 81, 83, 84, 88, 89, 90, 96, 97, 101, 102, 103, 104, 105, 107, 108, 109, 110, 113, 114, 121, 126, 127, 128, 130, 131, 132
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| The sequence contains products of odd number of distinct terms of A050376 [From Vladimir Shevelev (shevelev(AT)bgu.ac.il), May 04 2010]
|
|
|
REFERENCES
| J. Lambek and L. Moser, On some two way classifications of integers, Canad. Math. Bull. 2 (1959), 85-89.
J. Roberts, Lure of the Integers, Math. Assoc. America, 1992, p. 22.
|
|
|
LINKS
| T. D. Noe, Table of n, a(n) for n=1..10000
|
|
|
EXAMPLE
| 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.
|
|
|
MATHEMATICA
| iMoebiusMu[ n_ ] := Switch[ MoebiusMu[ n ], 1, 1, -1, -1, 0, If[ OddQ[ Plus@@(DigitCount[ Last[ Transpose[ FactorInteger[ n ] ] ], 2, 1 ]) ], -1, 1 ] ];
|
|
|
CROSSREFS
| Complement of A064176. Cf. A000028, A000379.
Sequence in context: A130520 A005706 A173345 * A000028 A026416 A123193
Adjacent sequences: A064172 A064173 A064174 * A064176 A064177 A064178
|
|
|
KEYWORD
| nonn,nice,easy
|
|
|
AUTHOR
| Wouter Meeussen (wouter.meeussen(AT)pandora.be), Sep 17 2001
|
| |
|
|
