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 A372663 #13 May 10 2024 04:16:19 %S A372663 1,11,46,139,316,633,1138,1947,3060,4583,6660,9367,12856,17153,22169, %T A372663 28886,36843,46179,57402,70096,84177,101268,121333,143664,168513, %U A372663 197084,228759,263965,304686,346832,396697,452114,508358,573205,638715,714691,799950,890893,984275 %N A372663 a(n) = Sum_{i=1..n} Sum_{j=1..n} Sum_{k=1..n} phi(i*j*k) / phi(j*k). %H A372663 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TotientFunction.html">Totient Function</a>. %t A372663 Table[Sum[EulerPhi[i*j*k]/EulerPhi[j*k], {i, 1, n}, {j, 1, n}, {k, 1, n}], {n, 1, 40}] (* _Vaclav Kotesovec_, May 10 2024 *) %o A372663 (PARI) a(n) = sum(i=1, n, sum(j=1, n, sum(k=1, n, eulerphi(i*j*k)/eulerphi(j*k)))); %Y A372663 Cf. A000010, A372661, A372662. %K A372663 nonn %O A372663 1,2 %A A372663 _Seiichi Manyama_, May 09 2024