cp's OEIS Frontend

A109030 Numbers that have exactly ten prime factors counted with multiplicity (A046314) whose digit reversal is different and also has 10 prime factors (with multiplicity).

%I A109030 #25 Feb 16 2025 08:32:58
%S A109030 46848,84864,217152,219456,232848,251712,257664,259776,274104,276048,
%T A109030 401472,415584,422820,428160,428736,447360,466752,485514,637824,
%U A109030 650160,654912,677952,808320,840672,846369,848232,963648
%N A109030 Numbers that have exactly ten prime factors counted with multiplicity (A046314) whose digit reversal is different and also has 10 prime factors (with multiplicity).
%C A109030 This sequence is the k = 10 instance of the series which begins with k = 1 (emirps), k = 2, k = 3 (A109023), k = 4 (A109024), k = 5 (A109025), k = 6 (A109026), k = 7 (A109027), k = 8 (A109028), k = 9 (A109029).
%H A109030 David A. Corneth, <a href="/A109030/b109030.txt">Table of n, a(n) for n = 1..10000</a>
%H A109030 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/AlmostPrime.html">Almost Prime</a>.
%H A109030 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Emirp.html">Emirp</a>.
%H A109030 Eric Weisstein and Jonathan Vos Post, <a href="https://mathworld.wolfram.com/Emirpimes.html">Emirpimes</a>.
%e A109030 a(1) = 46848 is in this sequence because 46848 = 2^8 * 3 * 61 has exactly 10 prime factors counted with multiplicity and reverse(46848) = 84864 = 2^7 * 3 * 13 * 17 also has exactly 10 prime factors counted with multiplicity.
%t A109030 taQ[n_]:=Module[{idn=IntegerDigits[n],rev},rev=Reverse[idn];rev!=idn&&PrimeOmega[n] == 10 == PrimeOmega[FromDigits[rev]]]; Select[Range[ 1000000], taQ] (* _Harvey P. Dale_, May 03 2013 *)
%o A109030 (PARI) is(n) = {
%o A109030 	my(r = fromdigits(Vecrev(digits(n))));
%o A109030 	n!=r && bigomega(n) == 10 && bigomega(r) == 10
%o A109030 } \\ _David A. Corneth_, Mar 07 2024
%Y A109030 Cf. A046314, A006567, A097393, A109018, A109023, A109024, A109025, A109026, A109027, A109028, A109029, A109031.
%K A109030 nonn,base
%O A109030 1,1
%A A109030 _Jonathan Vos Post_, Jun 16 2005