A110223 Numbers not the absolute difference between a cube and a square.
6, 14, 21, 29, 32, 34, 42, 46, 51, 58, 59, 62, 66, 69, 70, 75, 77, 78, 84, 85, 86, 88, 90, 93, 96, 102, 103, 110, 111, 114, 115, 123, 130, 133, 137, 140, 149, 157, 158, 160, 162, 165, 166, 173, 176, 178, 179, 181, 182, 183, 187, 194, 201, 202, 203, 205, 209, 210, 211
Offset: 1
Links
- T. D. Noe, Table of n, a(n) for n=1..5098
Programs
-
Mathematica
Complement[ Range[212], Union[ Flatten[ Table[ Select[ Table[ Abs[n^3 - m^2], {m, 0, 10000}], # < 10^3 &], {n, -5000, 5000}]]]]
Comments