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 A078379 #9 Mar 27 2025 04:28:58 %S A078379 1,1,2,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,2,1,2,1,1,1, %T A078379 1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1, %U A078379 1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1 %N A078379 Minimum exponent in prime factorization of numbers which can be written as sum of a positive square and a positive cube. %H A078379 Amiram Eldar, <a href="/A078379/b078379.txt">Table of n, a(n) for n = 1..10000</a> %F A078379 a(n) = A051904(A055394(n)). %t A078379 Min[FactorInteger[#][[;; , 2]]] & /@ Select[Range[300], Length[Reduce[a^2 + b^3 == # && a > 0 && b > 0, {a, b}, Integers]] > 0 &] (* _Amiram Eldar_, Mar 27 2025 *) %Y A078379 Cf. A051904, A055394, A078378, A078379, A078380. %K A078379 nonn %O A078379 1,3 %A A078379 _Reinhard Zumkeller_, Nov 25 2002