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 A062519 #15 Sep 17 2024 12:34:28
%S A062519 36,44,63,66,88,138,145,154,159,167,176,183,189,195,198,224,235,242,
%T A062519 246,253,257,264,268,275,279,286,297,318,325,333,345,347,352,354,357,
%U A062519 369,374,375,381,396,415,422,426,435,437,448,451,453,456,459,462,465
%N A062519 Numbers for which (product of digits) / (sum of digits) is an integer > 1.
%H A062519 Harry J. Smith, <a href="/A062519/b062519.txt">Table of n, a(n) for n = 1..1000</a>
%e A062519 63 is a member as (6*3)/(6+3) = 2 > 1.
%t A062519 pdsdQ[n_]:=Module[{idn=IntegerDigits[n],r},r=Times@@idn/Total[idn];IntegerQ[ r]&&r>1]; Select[Range[500],pdsdQ] (* _Harvey P. Dale_, Dec 22 2019 *)
%o A062519 (PARI) ok(n)={my(d=digits(n), p=vecprod(d), s=vecsum(d)); p > s && p%s == 0} \\ _Andrew Howroyd_, Sep 17 2024
%Y A062519 Sequence A061013 allows product = sum.
%K A062519 nonn,base,easy
%O A062519 1,1
%A A062519 _Amarnath Murthy_, Jun 26 2001
%E A062519 Corrected and extended by Larry Reeves (larryr(AT)acm.org), Jun 29 2001
%E A062519 Offset changed by _Andrew Howroyd_, Sep 17 2024