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 A098114 #11 Jan 25 2015 19:28:17 %S A098114 120,315,4752,7744,24960,57915,3386880 %N A098114 Numbers n such that n=(d_1+4)*(d_2+4)*...*(d_k+4) where d_1 d_2 ... d_k is the decimal expansion of n. %C A098114 Suppose that m is in the sequence and A is set of the digits of m if 6, s times appears in A, then 10^s divides m, also if 1 is in A and at least one even number be in A then 10 divides m, etc. %C A098114 No other terms below 10^100. - _Max Alekseyev_, Jan 25 2015 %e A098114 3386880 is in the sequence because %e A098114 3386880=(3+4)*(3+4)*(8+4)*(6+4)*(8+4)*(8+4)*(0+4). %t A098114 Do[d=IntegerDigits[n];k=Length[d];If[n==Product[d[[j]]+4, {j, k}], Print[n]], {n, 1030000000}] %t A098114 Select[Range[4000000],#==Times@@(IntegerDigits[#]+4)&] (* _Harvey P. Dale_, Dec 11 2012 *) %Y A098114 Cf. A097371, A097372, A098113. %K A098114 base,more,nonn %O A098114 1,1 %A A098114 _Farideh Firoozbakht_, Sep 24 2004