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 A055702 #9 Mar 02 2014 10:09:01 %S A055702 1,2,6,86,2033,9617,32052,439369,552012,708292,849660,1869252,2038140, %T A055702 2083244,2350089,2569210,2930460,3875508,4973090,7248671,13864156, %U A055702 23500890,25516264,45711708,57226685,109512060,112389732,197121708,240926532,386807715,395172531 %N A055702 Numbers n such that n | Sigma_8(n) + Phi(n)^8. %C A055702 sigma_8(n) is the sum of the 8th powers of the divisors of n (A013956). %t A055702 Do[If[Mod[DivisorSigma[8, n]+EulerPhi[n]^8, n]==0, Print[n]], {n, 1, 10^5}] %o A055702 (PARI) isok(n) = !((sigma(n, 8) + eulerphi(n)^8) % n); \\ _Michel Marcus_, Mar 02 2014 %K A055702 nonn %O A055702 1,2 %A A055702 _Robert G. Wilson v_, Jun 09 2000 %E A055702 More terms from _Michel Marcus_, Mar 02 2014