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 A258320 #5 May 26 2015 08:08:29 %S A258320 49639,496390,736968,4963900,7369680,7989889,8962888,49639000, %T A258320 73696800,79898890,89628880,284799946,467995756,468754968,479593884, %U A258320 479698887,493968877,496390000,736968000,789499856,795875871,796999858,798968787,798988900,896288800 %N A258320 Sum of the digits of n exceeds the sum of the digits of n^2 and the sum of digits of n^3. %C A258320 Intersection of A064399 and A064209. %H A258320 Giovanni Resta, <a href="/A258320/b258320.txt">Table of n, a(n) for n = 1..463</a> (terms < 2^(128/3)) %e A258320 n = 49639 is in the sequence because sod(n) = 31, sod(n^2) = 25 and sod(n^3) = 28. Here n^2 = 2464030321 and n^3 = 122312001104119. %t A258320 sod[n_]:=Plus@@ IntegerDigits@ n; Select[Range[10^6], sod[#^3] < sod@# && sod[#^2] < sod@# &] %Y A258320 Cf. A064399, A064209. %K A258320 nonn,base %O A258320 1,1 %A A258320 _Giovanni Resta_, May 26 2015