A213983 - OEIS

%I #4 Jun 30 2012 11:25:01

%S 0,1,3,6,8,15,15,28,24,27,35,66,42,91,63,60,64,153,81,190,90,105,143,

%T 276,118,125,195,162,154,435,165,496,192,209,323,210,216,703,399,260,

%U 253,861,273,946,297,309,575,1128,336,343,375,374,377,1431,405,440

%N Smallest integer x >= 0 satisfying x^2 - y^2 = n^3.

%C 33 is the smallest odd number with the property that n does not divide a(n).

%t lst = {}; Do[y = 0; While[True, s = Last@Last@Reduce[x^2 - y^2 == n^3, x]; If[IntegerQ[s], Break[]]; y++]; AppendTo[lst, s], {n, 55}]; Prepend[lst, 0]

%K nonn

%O 0,3

%A _Arkadiusz Wesolowski_, Jun 30 2012