OFFSET
1,1
COMMENTS
EXAMPLE
5 is the smallest integer with 1 digit such that 5 + A007954(5) has 2 digits, with result 5 + 5 = 10, hence a(1)=5.
PROG
(PARI) DP(n)= my(d = digits(n)); prod(i=1, #d, d[i]);
a(n) = {for (i=10^(n-1), 10^n-1, if (i + DP(i) >= 10^n, return(i)); ); }
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Jun 01 2014
EXTENSIONS
a(10)-a(20) from Derek Orr, Jun 02 2014
STATUS
approved