OFFSET
1,1
COMMENTS
EXAMPLE
Number 133 is in sequence because 1*3*3=9.
MATHEMATICA
Select[Range[320000], !PrimeQ[#]&&Times@@IntegerDigits[#]==9&] (* Harvey P. Dale, Aug 27 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Nov 25 2011
STATUS
approved