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 A051415 #8 Jul 19 2012 11:33:48 %S A051415 1,3,4,5,6,7,8,9,18,20,21,22,23,24,25,26,29,37,38,43,45,46,48,49,51, %T A051415 57,62,65,68,72,73,75,76,78,79,87,90,92,93,94,95,98,100,106,115,117, %U A051415 121,123,126,127,128,129,133,134,139,142,145,146,147,150,153,156,158,160 %N A051415 Numbers not of form n + sum of digits of n^3. %t A051415 With[{nn=160},Select[Complement[Range[nn],#+Total[ IntegerDigits[ #^3]]&/@Range[nn]],#<=nn&]] (* _Harvey P. Dale_, Jul 19 2012 *) %Y A051415 Cf. A003052, A051374, A051373, A051408-A051414. %K A051415 nonn,base,easy,less %O A051415 1,2 %A A051415 Miklos SZABO (mike(AT)ludens.elte.hu)