OFFSET
1,1
LINKS
FORMULA
PROG
(PARI) A(n)=local(x, y, z); x=n+1; while(1, y=x+1; while(n^3+x^3+y^3>=(y+1)^3, if(ispower(n^3+x^3+y^3, 3, &z) && (gcd([n, x, y, z])==1), return(z)); y++; ); x++; ); \\ Martin Fuller, Aug 11 2006
CROSSREFS
KEYWORD
nonn
AUTHOR
Lekraj Beedassy, Jul 16 2006
EXTENSIONS
More terms from Martin Fuller, Aug 11 2006
Corrected by R. J. Mathar, Nov 25 2006
STATUS
approved