A367455 Numbers not divisible by 6 that are neither squarefree nor prime powers.
20, 28, 40, 44, 45, 50, 52, 56, 63, 68, 75, 76, 80, 88, 92, 98, 99, 100, 104, 112, 116, 117, 124, 135, 136, 140, 147, 148, 152, 153, 160, 164, 171, 172, 175, 176, 184, 188, 189, 196, 200, 207, 208, 212, 220, 224, 225, 232, 236, 242, 244, 245, 248, 250, 260, 261
Offset: 1
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[261], And[Nor[SquareFreeQ[#], PrimePowerQ[#]], Mod[#, 6] != 0] &]
Comments