login
A231877
Numbers n such that omega(n)^2 (cf. A001221) does not divide n.
2
1, 6, 10, 14, 15, 18, 21, 22, 26, 30, 33, 34, 35, 38, 39, 42, 45, 46, 50, 51, 54, 55, 57, 58, 60, 62, 63, 65, 66, 69, 70, 74, 75, 77, 78, 82, 84, 85, 86, 87, 91, 93, 94, 95, 98, 99, 102, 105, 106, 110, 111, 114, 115, 117, 118, 119, 120, 122, 123, 129, 130, 132, 133, 134, 135, 138, 140, 141, 142, 143, 145, 146, 147, 150
OFFSET
1,2
LINKS
MATHEMATICA
Join[{1}, Select[Range[2, 500], Mod[#, PrimeNu[#]^2] != 0 &]] (* G. C. Greubel, Apr 24 2017 *)
CROSSREFS
Sequence in context: A300080 A069169 A230766 * A080364 A325230 A227299
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 17 2013
STATUS
approved