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 A062999 #18 Aug 11 2025 09:02:08 %S A062999 23,24,25,26,27,28,29,32,33,34,35,36,37,38,39,42,43,44,45,46,47,48,49, %T A062999 52,53,54,55,56,57,58,59,62,63,64,65,66,67,68,69,72,73,74,75,76,77,78, %U A062999 79,82,83,84,85,86,87,88,89,92,93,94,95,96,97,98,99,124,125,126,127 %N A062999 Numbers whose sum of the digits is strictly less than its product of digits. %H A062999 Harry J. Smith, <a href="/A062999/b062999.txt">Table of n, a(n) for n = 1..1000</a> %t A062999 Select[Range[128], (Plus @@ IntegerDigits[ # ]) < (Times @@ IntegerDigits[ # ]) &] (* _Alonso del Arte_, May 16 2005 *) %o A062999 (PARI) isok(k)={my(d=digits(k)); vecsum(d) < vecprod(d)} \\ _Harry J. Smith_, Aug 15 2009 %Y A062999 Cf. A007953, A007954, A034710, A062329, A062996, A062997, A062998, A062999. %K A062999 base,nonn %O A062999 1,1 %A A062999 _Henry Bottomley_, Jun 29 2001