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 A055703 #15 Nov 19 2024 01:02:47 %S A055703 1,2,12,54,76,90,216,423,514,531,621,2166,2241,2772,2976,4752,5154, %T A055703 5400,5481,6264,7290,7344,9018,9144,9470,9555,14094,14904,19494,21222, %U A055703 23780,25848,28323,34830,34911,38220,40122,48768,49079,55782,59400 %N A055703 Numbers k such that k | sigma_9(k) - phi(k)^9. %C A055703 sigma_9(k) is the sum of the 9th powers of the divisors of k (A013957). %H A055703 Amiram Eldar, <a href="/A055703/b055703.txt">Table of n, a(n) for n = 1..250</a> %t A055703 Do[If[Mod[DivisorSigma[9, n]-EulerPhi[n]^9, n]==0, Print[n]], {n, 1, 10^5}] %o A055703 (PARI) isok(n) = !((sigma(n, 9) - eulerphi(n)^9) % n); \\ _Michel Marcus_, Mar 02 2014 %Y A055703 Cf. A000010, A013957. %K A055703 nonn %O A055703 1,2 %A A055703 _Robert G. Wilson v_, Jun 09 2000 %E A055703 Definition corrected by _Michel Marcus_, Mar 02 2014