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 A065138 #9 Jul 19 2015 01:02:31
%S A065138 0,12,30,666,870,960,1998
%N A065138 Numbers that are equal to the sum of their digits plus the sum of cubes of their digits.
%D A065138 Underwood Dudley, Numerology or, what Pythagoras wrought, Spectrum Series, Chapter 7 - Beastly Curiosities, page 71, Mathematical Association of America, Washington, D.C., 1997. [From _Robert G. Wilson v_, Apr 27 2009]
%H A065138 Terry Trotter, <a href="http://www.geocities.com/ttrotter3/tmn0598.gif">Trotter Math. News, 1998</a>[broken link]
%e A065138 12 is included because 12 = (1 + 2) + (1^3 + 2^3).
%t A065138 fQ[n_] := Block[{id = IntegerDigits@ n}, Plus @@ id + Plus @@ (id^3) == n]; Select[ Range[0, 2000], fQ@# &] (* _Robert G. Wilson v_, Apr 27 2009 *)
%Y A065138 Cf. A046197, A065137.
%K A065138 base,fini,full,nonn
%O A065138 1,2
%A A065138 _Henry Bottomley_, Oct 15 2001