OFFSET
1,2
EXAMPLE
1 = 0^3 + 1!.
25 = 1^3 + 4!.
784 = 4^3 + 6!.
5041 = 1^3 + 7!.
PROG
(PARI) is1(n) = {my(sq = n^2, f = 1, k = 1); while(f <= sq && !ispower(sq - f, 3), k++; f *= k); f <= sq; }
lista(kmax) = for(k = 1, kmax, if(is1(k), print1(k^2, ", "))); \\ Amiram Eldar, Jun 24 2024
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Martin Ehrenstein, Jun 24 2024
EXTENSIONS
a(10) from Amiram Eldar, Jun 24 2024
a(11)-a(16) from David A. Corneth, Jun 24 2024
a(17) from Michael S. Branicky, Jun 26 2024
STATUS
approved