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 A372662 #14 May 10 2024 04:17:15 %S A372662 1,14,72,271,731,1649,3417,6654,11495,18635,29971,45088,67562,95862, %T A372662 129315,180548,247178,324463,429785,547025,679318,853788,1080248, %U A372662 1324791,1617620,1964622,2361036,2813206,3392778,3946537,4704245,5550066,6389704,7421750,8455877 %N A372662 a(n) = Sum_{i=1..n} Sum_{j=1..n} Sum_{k=1..n} phi(i*j*k) / phi(k). %H A372662 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TotientFunction.html">Totient Function</a>. %t A372662 Table[Sum[EulerPhi[i*j*k]/EulerPhi[k], {i, 1, n}, {j, 1, n}, {k, 1, n}], {n, 1, 40}] (* _Vaclav Kotesovec_, May 10 2024 *) %o A372662 (PARI) a(n) = sum(i=1, n, sum(j=1, n, sum(k=1, n, eulerphi(i*j*k)/eulerphi(k)))); %Y A372662 Cf. A000010, A372636, A372661, A372663. %K A372662 nonn %O A372662 1,2 %A A372662 _Seiichi Manyama_, May 09 2024