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 A064399 #14 Dec 04 2024 17:36:13 %S A064399 39,48,49,79,149,179,249,318,348,349,389,390,399,448,449,480,489,490, %T A064399 498,499,548,549,579,649,679,749,789,790,795,799,849,889,895,898,899, %U A064399 949,1049,1096,1149,1249,1429,1488,1489,1490,1497,1498,1499,1735,1739 %N A064399 Numbers k whose sum of digits exceeds the sum of the digits of k^2. %H A064399 Harry J. Smith, <a href="/A064399/b064399.txt">Table of n, a(n) for n = 1..1000</a> %t A064399 Select[ Range[ 2500 ], Apply[ Plus, IntegerDigits[ # ] ] > Apply[ Plus, IntegerDigits[ #^2 ] ] & ] %o A064399 (PARI) isok(n) = sumdigits(n) > sumdigits(n^2); \\ _Michel Marcus_, Jun 24 2018 %Y A064399 Cf. A007953, A004159. %K A064399 base,nonn %O A064399 1,1 %A A064399 _Robert G. Wilson v_, Sep 28 2001