

A109029


9almost primes (A046312) whose digit reversal is different and also has 9 prime factors (with multiplicity). "Emirp Tsomla9.".


4



21168, 23424, 23616, 27456, 41184, 42432, 48114, 61632, 65472, 86112, 211410, 212256, 213192, 215232, 217440, 219072, 230208, 232512, 236925, 236928, 238656, 238680, 251100, 251505, 251748, 253824, 255024, 255960, 257856, 259968, 270912
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

This sequence is the k = 8 instance of the series which begins with k = 1 (emirps), k = 2 (emirpimes), k = 3 (emirp tsomla3 = A109023), k = 4 (emirp tsomla4 = A109024), k = 5 (emirp tsomla5 = A109025), k = 6 (emirp tsomla6 = A109026), k = 7 (emirp tsomla7 = A109027), k = 8 (emirp tsomla8 = A109028).
The Mathematica code for this was written by Ray Chandler who extended this sequence. He also has more values.


REFERENCES

Jonathan Vos Post, "1066 and All That: Emirp Tsomla3 and Related Integer Sequences." Forthcoming paper on this sequence.


LINKS

Eric Weisstein's World of Mathematics, Emirp.


EXAMPLE

a(1) = 21168 is in this sequence because 21168 = 2^4 * 3^3 * 7^2 is a 9almost prime and reverse(21168) = 86112 = 2^5 * 3^2 * 13 * 23 is also a 9almost prime.


MATHEMATICA

okQ[n_]:=Module[{idn=IntegerDigits[n], ridn}, ridn=Reverse[idn]; idn!=ridn && PrimeOmega[n]==9&&PrimeOmega[FromDigits[ridn]]==9]; Select[Range[ 271000], okQ] (* Harvey P. Dale, Sep 24 2011 *)


CROSSREFS



KEYWORD

nonn,base


AUTHOR



STATUS

approved



