OFFSET
1,2
COMMENTS
I.e., the product of digits is 1, 4, or 9. - Franklin T. Adams-Watters, Sep 27 2016
MATHEMATICA
Select[Range[12000], MemberQ[{1, 4, 9}, Times@@IntegerDigits[#]]&] (* Harvey P. Dale, Jan 22 2016 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jun 15 1999
STATUS
approved