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 A048792 #4 Mar 30 2012 17:30:20 %S A048792 0,1,7,10,11,68,70,100,101,110,324,680,700,1000,1001,1010,1100,3240, %T A048792 6800,7000,7618,10000,10001,10010,10100,11000,31177,32400,52308,68000, %U A048792 69314,70000,76180,100000,100001,100010,100100,101000,110000,311770 %N A048792 When cubed gives number composed just of the digits 0, 1, 2, 3, 4. %t A048792 Do[ If[ Union[ IntegerDigits[n^3]] [[ -1]] < 5, Print[n]], {n, 0, 10^6} ] %K A048792 base,nonn %O A048792 0,3 %A A048792 _Robert G. Wilson v_, Jun 23 2001