OFFSET
1,1
COMMENTS
LINKS
David A. Corneth, Table of n, a(n) for n = 1..10000 (first 3500 terms from Harvey P. Dale)
Eric Weisstein's World of Mathematics, Almost Prime.
Eric Weisstein's World of Mathematics, Emirp.
Eric Weisstein and Jonathan Vos Post, Emirpimes.
EXAMPLE
a(1) = 2576 is in this sequence because 2576 = 2^4 * 7 * 23 has exactly 6 prime factors counted with multiplicity reverse(2576) = 6752 = 2^5 * 211 is also has exactly 6 prime factors counted with multiplicity.
MATHEMATICA
Select[Range[23000], !PalindromeQ[#]&&Total[FactorInteger[#][[All, 2]]] == Total[FactorInteger[IntegerReverse[#]][[All, 2]]]==6&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 10 2017 *)
PROG
(PARI) is(n) = {
my(r = fromdigits(Vecrev(digits(n))));
n!=r && bigomega(n) == 6 && bigomega(r) == 6
} \\ David A. Corneth, Mar 07 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jonathan Vos Post, Jun 16 2005
STATUS
approved