

A066153


(product of digits of n) * (sum of digits of n) = 4n.


0




OFFSET

1,2


COMMENTS

A ddigit number is at least 10^(d1), its product of digits is at most 9^d, and its sum of digits is at most 9d. For d >= 70, 4 * 10^(d1) > 9^d * 9d, and so the sequence is finite. (Of course this can be improved.)


LINKS



MATHEMATICA

Do[ If[ 4n == Apply[ Times, IntegerDigits[n]] Apply[ Plus, IntegerDigits[n]], Print[n]], {n, 0, 10^7} ]


CROSSREFS



KEYWORD

nonn,base,fini


AUTHOR



EXTENSIONS



STATUS

approved



