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 A078385 #10 Mar 27 2025 04:25:21 %S A078385 1,4,6,4,4,16,8,12,12,30,20,12,36,42,20,20,24,36,36,48,32,24,72,36,32, %T A078385 40,88,72,40,100,36,112,60,36,126,64,84,66,92,112,72,40,72,132,80,64, %U A078385 108,56,116,144,108,84,196,64,102,96,180,80,222,120,112,112,232,240,80 %N A078385 Euler's totient of numbers which can be written as sum of a positive square and a positive cube. %H A078385 Amiram Eldar, <a href="/A078385/b078385.txt">Table of n, a(n) for n = 1..10000</a> %F A078385 a(n) = A000010(A055394(n)). %t A078385 EulerPhi[Select[Range[200], Length[Reduce[a^2 + b^3 == # && a > 0 && b > 0, {a, b}, Integers]] > 0 &]] (* _Amiram Eldar_, Mar 27 2025 *) %Y A078385 Cf. A000010, A055394. %K A078385 nonn %O A078385 1,2 %A A078385 _Reinhard Zumkeller_, Nov 25 2002