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 A362628 #6 Apr 28 2023 17:37:42
%S A362628 1,3,1,7,1,12,1,15,1,3,1,28,1,3,1,31,1,39,1,22,1,3,1,60,1,3,1,7,1,12,
%T A362628 1,63,1,3,1,91,1,3,1,50,1,33,1,7,1,3,1,124,1,3,1,7,1,120,1,15,1,3,1,
%U A362628 43,1,3,1,127,1,12,1,7,1,3,1,195,1,3,1,7,1,12,1,106,1,3,1,140
%N A362628 a(n) = Sum_{d|n, phi(d)|n} d.
%t A362628 a[n_] := DivisorSum[n, # &, Divisible[n, EulerPhi[#]] &]; Array[a, 100]
%o A362628 (PARI) a(n) = sumdiv(n, d, if (!(n % eulerphi(d)), d)); \\ _Michel Marcus_, Apr 28 2023
%Y A362628 Cf. A000010 (phi), A069932, A362470.
%K A362628 nonn,easy
%O A362628 1,2
%A A362628 _Wesley Ivan Hurt_, Apr 28 2023