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 A096928 #4 Apr 21 2018 15:38:34
%S A096928 1014,8305,18305,26425,30205,30725,31414,39186,41156,51358,71110,
%T A096928 71136,72505,74470,80305,82765,90985,100405,100786,100855,101014,
%U A096928 101098,101126,102072,110474,112418,118305,126425,130205,130725,131414,139186
%N A096928 Numbers n for which there are exactly seven k such that n = k + (product of nonzero digits of k).
%e A096928 678, 854, 933, 942, 960, 1007 and 1012 are the only seven k such that k + (product of nonzero digits of k) = 1014, hence 1014 is a term.
%t A096928 Select[Tally[Table[n+Times@@Select[IntegerDigits[n],#!=0&],{n,200000}]], #[[2]] == 7&][[All,1]]//Sort (* _Harvey P. Dale_, Apr 21 2018 *)
%o A096928 (PARI) {c=7;z=140000;v=vector(z);for(n=1,z+1,k=addpnd(n);if(k<=z,v[k]=v[k]+1));for(j=1,length(v),if(v[j]==c,print1(j,",")))} \\for function addpnd see A096922
%Y A096928 Cf. A063114, A096347, A096922 - A096927, A096929 - A096931.
%K A096928 nonn,base
%O A096928 1,1
%A A096928 _Klaus Brockhaus_, Jul 15 2004