cp's OEIS Frontend

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.

A246569 Semiprimes with strictly increasing product of digits.

This page as a plain text file.
%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