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 A078388 #9 Mar 27 2025 04:33:00
%S A078388 1,1,6,7,16,1,44,15,32,1,14,60,1,1,48,45,56,22,51,18,72,156,1,80,176,
%T A078388 43,1,20,140,1,216,1,63,165,1,448,46,69,50,34,152,185,236,30,168,129,
%U A078388 123,151,62,42,216,252,1,284,105,432,38,284,1,240,115,356,1,1,211,456
%N A078388 Arithmetic derivative of numbers which can be written as sum of a positive square and a positive cube.
%H A078388 Amiram Eldar, <a href="/A078388/b078388.txt">Table of n, a(n) for n = 1..10000</a>
%F A078388 a(n) = A003415(A055394(n)). - _Amiram Eldar_, Mar 27 2025
%t A078388 ad[n_] := n * Plus @@ ((Last[#]/First[#]) & /@ FactorInteger[n]); ad /@ Select[Range[300], Length[Reduce[a^2 + b^3 == # && a > 0 && b > 0, {a, b}, Integers]] > 0 &] (* _Amiram Eldar_, Mar 27 2025 *)
%Y A078388 Cf. A003415, A055394, A078386.
%K A078388 nonn
%O A078388 1,3
%A A078388 _Reinhard Zumkeller_, Nov 25 2002