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 A056033 #4 Sep 30 2012 01:45:34
%S A056033 2,3,4,7,8,9,24,32,43,49,51,57,68,75,93,99,125,193,249,251,307,375,
%T A056033 432,443,499,501,557,568,624,693,749,751,807,875,943,999,1249,1251,
%U A056033 1693,1875,2057,2499,2501,2943,3125,3307,3568,3749,3751,4193,4375,4557,4999
%N A056033 5-morphic but not bimorphic nor automorphic.
%t A056033 Do[x=Floor[N[Log[10, n],25]]+1; If[Mod[n^5, 10^x] == n,If[Mod[n^2, 10^x]!= n, Print[n]]], {n, 10^4}]
%Y A056033 Cf. A003226 and A033819.
%K A056033 easy,nonn
%O A056033 1,1
%A A056033 _Robert G. Wilson v_, Jul 24 2000