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 A227073 #8 Jul 31 2013 01:45:38 %S A227073 1,12,21,22,123,132,213,231,312,321,333,1224,1234,1242,1243,1324,1342, %T A227073 1422,1423,1432,2124,2134,2142,2143,2214,2241,2244,2314,2341,2412, %U A227073 2413,2421,2424,2431,2442,3124,3142,3214,3241,3412,3421,4122,4123,4132,4212,4213 %N A227073 Positive numbers without the digit 0 such that sum of cubes of the digits equals the square of the sum of the digits. %C A227073 There are a total of 320880755 numbers in this sequence. %H A227073 T. D. Noe, <a href="/A227073/b227073.txt">Table of n, a(n) for n = 1..2987</a> (numbers less than 10^6) %t A227073 (* let tx[[i]] be numbers computed in A227072 *) Sort[Flatten[ %t A227073 Table[FromDigits /@ Permutations[IntegerDigits[tx[[n]]]], {n, 14}]]] %Y A227073 Cf. A225567 (primes in a related sequence), A227072. %K A227073 nonn,base,fini %O A227073 1,2 %A A227073 _T. D. Noe_, Jul 27 2013