%I #12 May 01 2013 21:13:44
%S 0,1,3,8,9,12,15,17,18,19,22,24,30,36,37,38,40,44,55,57,64,65,68,71,
%T 73,79,80,89,97,98,100,101,106,107,108,112,113,119,121,128,129,138,
%U 141,145,148,151,154,156,161,163,164,168,169,171,172,190,196,197,198,204,208
%N Nonnegative integers of the form m^2 - floor(m^(2/3))^3 where m is a positive integer.
%C The positive terms form a subsequence of A087286. Some terms of A087286 are missing here, the smallest such number being 3781 = (6^3)^2 - (6^2-1)^3. [From Max Alekseyev, Jun 19 2011]
%t lst={}; Do[a=(x=n^2)-(y=Floor[(n^2)^(1/3)]^3); If[a<=416,AppendTo[lst,a]], {n,8!}]; Take[Union@lst,100]
%Y Cf. A087286, A165288.
%K nonn
%O 1,3
%A _Vladimir Joseph Stephan Orlovsky_, Sep 13 2009
%E Minor edits by _N. J. A. Sloane_, Oct 24 2009
%E Definition corrected by _Max Alekseyev_, Jun 19 2011