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 A056751 #3 Mar 30 2012 17:30:26 %S A056751 1,2,3,4,6,9,12,27,34,42,68,81,84,102,172,204,243,348,578,639,714,729, %T A056751 837,1156,1428,1431,1734,1878,1972,2187,3468,4077,4187,4326,5213,6093, %U A056751 6561,9826,9962,12138,16014,16878,18212,19652,19683,21627,24276,29478 %N A056751 Numbers n such that n | 8^n + 7^n + 6^n + 5^n + 4^n + 3^n + 2^n + 1^n. %t A056751 Do[ If[ Mod[ PowerMod[ 8, n, n ] + PowerMod[ 7, n, n ] + PowerMod[ 6, n, n ] + PowerMod[ 5, n, n ] + PowerMod[ 4, n, n ] + PowerMod[ 3, n, n ] + PowerMod[ 2, n, n ] + 1, n ] == 0, Print[ n ] ], {n, 1, 10^6} ] %Y A056751 Cf. A001555. %K A056751 nonn %O A056751 1,2 %A A056751 _Robert G. Wilson v_, Aug 25 2000