OFFSET
1,1
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
a(1) = 4 because 4 (base 9) = 4 (base 10) = 2 * 2, a semiprime (A001358).
a(2) = 6 because 6 (base 9) = 6 (base 10) = 2 * 3.
a(3) = 9 because 9 (base 9) = 10 and 10 (base 10) = 2 * 5.
a(4) = 13 because 13 (base 9) = 14 and 14 (base 10) = 2 * 7.
a(5) = 14 because 14 (base 9) = 15 and 15 (base 10) = 3 * 5.
MATHEMATICA
Select[Range[181], Plus @@ Last /@ FactorInteger[FromDigits[IntegerDigits[ #, 9]]] == 2 &] (* Ray Chandler, Aug 05 2005 *)
Select[Range[200], PrimeOmega[FromDigits[IntegerDigits[#, 9]]]==2&] (* Harvey P. Dale, Dec 02 2018 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jonathan Vos Post, Jul 30 2005
EXTENSIONS
Extended by Ray Chandler, Aug 05 2005
STATUS
approved