A070930 - OEIS

%I #10 Jun 08 2019 16:27:59

%S 0,11,44,87,104,35,343,0,298,648,984,1216,1230,888,28,3385,1663,5616,

%T 2330,6375,631,4072,7655,11224,14599,17576,0,21400,21719,20584,17671,

%U 12632,5095,31295,20250,5543,32463,12016,39196,11353,37527,440,24150

%N Smallest integer >= 0 of the form x^3 - n^4.

%C a(n)=0 if n is a cube.

%F a(n) = ceiling(n^(4/3))^3 - n^4.

%t Array[Ceiling[#^(4/3)]^3-#^4&,50] (* _Harvey P. Dale_, Dec 24 2015 *)

%o (PARI) for(n=1,100,print1(ceil(n^(4/3))^3-n^4,","))

%Y Cf. A068527.

%K easy,nonn

%O 1,2

%A _Benoit Cloitre_, May 20 2002