This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A373970 #20 Jun 27 2024 11:31:02
%S A373970 1,9,25,121,784,1024,5041,363609,542939080336,160351569000000,
%T A373970 51312167754301440000,65249379457597440000,449519240612413440000,
%U A373970 957230928468541440000,4797276365676433637376,16367773504928806600704,308090303428827709440000
%N A373970 Squares equal to the sum of a cube and a factorial number.
%e A373970 1 = 0^3 + 1!.
%e A373970 25 = 1^3 + 4!.
%e A373970 784 = 4^3 + 6!.
%e A373970 5041 = 1^3 + 7!.
%o A373970 (PARI) is1(n) = {my(sq = n^2, f = 1, k = 1); while(f <= sq && !ispower(sq - f, 3), k++; f *= k); f <= sq;}
%o A373970 lista(kmax) = for(k = 1, kmax, if(is1(k), print1(k^2, ", "))); \\ _Amiram Eldar_, Jun 24 2024
%Y A373970 Cf. A000142, A000290, A000578, A373218.
%Y A373970 A085692 is a subsequence.
%K A373970 nonn,more
%O A373970 1,2
%A A373970 _Martin Ehrenstein_, Jun 24 2024
%E A373970 a(10) from _Amiram Eldar_, Jun 24 2024
%E A373970 a(11)-a(16) from _David A. Corneth_, Jun 24 2024
%E A373970 a(17) from _Michael S. Branicky_, Jun 26 2024