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 A093038 #20 Jan 08 2025 17:02:27
%S A093038 1,2,3,6,322,966,473732,1420296,6655780894
%N A093038 Numbers k such that sum of 5th powers of divisors of k is divisible by the square of Euler-phi of k.
%C A093038 No more terms through 10^9. - _Ryan Propper_, Jan 09 2007
%F A093038 A001160(k)/A000010(k)^2 is an integer.
%t A093038 Do[ If[ Mod[ DivisorSigma[5, n], EulerPhi[n]^2] == 0, Print[n]], {n, 10^7}] (* _Robert G. Wilson v_, May 23 2004 *)
%o A093038 (PARI) isok(k) = (sigma(k, 5) % eulerphi(k)^2) == 0; \\ _Michel Marcus_, Mar 07 2020
%Y A093038 Cf. A000010, A015763, A091285.
%K A093038 nonn,more
%O A093038 1,2
%A A093038 _Labos Elemer_, May 19 2004
%E A093038 a(9) from _Amiram Eldar_, Mar 07 2020