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 A055700 #13 Nov 19 2024 01:02:34
%S A055700 1,2,6,22,84,350,525,1150,1652,2366,2996,6677,8140,8371,9084,11510,
%T A055700 11825,27885,30694,43000,44988,45060,49585,172250,207194,312312,
%U A055700 335634,364084,568575,887250,1183000,1588956,1799240,1829256,1913975,2455350,3523800,3678454
%N A055700 Numbers k such that k | sigma_6(k) + phi(k)^6.
%C A055700 sigma_6(k) is the sum of the 6th powers of the divisors of k (A013954).
%H A055700 Amiram Eldar, <a href="/A055700/b055700.txt">Table of n, a(n) for n = 1..100</a>
%t A055700 Do[If[Mod[DivisorSigma[6, n]+EulerPhi[n]^6, n]==0, Print[n]], {n, 1, 10^5}]
%o A055700 (PARI) isok(n) = !((sigma(n, 6) + eulerphi(n)^6) % n); \\ _Michel Marcus_, Mar 02 2014
%Y A055700 Cf. A000010, A013954.
%K A055700 nonn
%O A055700 1,2
%A A055700 _Robert G. Wilson v_, Jun 09 2000
%E A055700 More terms from _Michel Marcus_, Mar 02 2014