OFFSET
1,1
COMMENTS
From Felix Fröhlich, Jun 01 2019: (Start)
Numbers n such that A025448(n) = 0.
Conjecture: The sequence is finite, with 113936676 terms, the largest being 7373170279850 (cf. Deshouillers et al, 2000, Conj. 1 and 2). (End)
LINKS
T. D. Noe, Table of n, a(n) for n = 1..10000
Jean-Marc Deshouillers, Francois Hennecart and Bernard Landreau; appendix by I. Gusti Putu Purnaba, 7373170279850, Math. Comp., Vol. 69, No. 229 (2000), 421-439.
MATHEMATICA
Complement[Range[134], Take[Union[Total[#^3]&/@Tuples[Range[0, 20], {4}]], 60]] (* Harvey P. Dale, Nov 22 2010 *)
PROG
(PARI) cubes(bound) = my(v=[], x=0); while(1, v=concat(v, [x^3]); x++; if(x^3 > bound, return(v)))
a025448(n) = my(i=0, c=cubes(n)); for(s=1, #c, for(t=s, #c, for(u=t, #c, for(v=u, #c, if(n==c[s]+c[t]+c[u]+c[v], i++))))); i
is(n) = a025448(n)==0 \\ Felix Fröhlich, Jun 01 2019
CROSSREFS
KEYWORD
nonn,easy,fini,nice
AUTHOR
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), May 16 2001
STATUS
approved