A105642 Composite nonsquares and noncubes.
6, 10, 12, 14, 15, 18, 20, 21, 22, 24, 26, 28, 30, 32, 33, 34, 35, 38, 39, 40, 42, 44, 45, 46, 48, 50, 51, 52, 54, 55, 56, 57, 58, 60, 62, 63, 65, 66, 68, 69, 70, 72, 74, 75, 76, 77, 78, 80, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 96, 98, 99, 102, 104, 105, 106, 108
Offset: 1
Keywords
Programs
-
Mathematica
nn=200; Complement[Range[nn], Prime[Range[PrimePi[nn]]], Range[Sqrt[nn]]^2, Range[nn^(1/3)]^3] (* Harvey P. Dale, Jan 26 2011 *)
-
PARI
is(n)=n>1 && !isprime(n) && !issquare(n) && !ispower(n,3) \\ Charles R Greathouse IV, Oct 19 2015
Formula
a(n) = n + O(n/log n). - Charles R Greathouse IV, Oct 19 2015