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 A246569 #7 Sep 06 2014 12:17:44 %S A246569 4,6,9,25,26,35,38,39,49,58,69,87,249,259,278,289,299,398,478,489,579, %T A246569 589,679,689,699,789,799,889,899,2589,2599,2779,2798,2899,3799,3898, %U A246569 3899,4798,4979,4989,5799,5899,5999,6989,6999,7899,7999,8899,9899,19999,26799 %N A246569 Semiprimes with strictly increasing product of digits. %C A246569 Primes of this form are at A230041. %H A246569 K. D. Bajpai, <a href="/A246569/b246569.txt">Table of n, a(n) for n = 1..169</a> %e A246569 a(6) = 35 = 5 * 7, which is semiprime. Product of its digits = 3 * 5 = 15. %e A246569 a(7) = 38 = 2 * 19, which is semiprime. Product of its digits = 3 * 8 = 24. %e A246569 Since 24 > 15, 35 and 38 appear in the sequence. %t A246569 A246569 = { }; t = 0; Do[s = Apply[Times, IntegerDigits[k]]; If[PrimeOmega[k] == 2 && s > t, t = s; AppendTo[A246569, k]], {k, 1, 30000}]; A246569 %Y A246569 Cf. A001358, A230041. %K A246569 nonn,base %O A246569 1,1 %A A246569 _K. D. Bajpai_, Aug 30 2014