A243079 Numbers n such that A = n - DigitProd(n) is divisible by the largest power of 10 <= A.

1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 16, 17, 18, 19, 35, 55, 62, 64, 66, 68, 75, 95, 236, 315, 324, 575, 612, 828, 935, 944, 4384, 5175, 7688, 7735, 8128, 8672, 9135, 9144, 9575, 91575

Offset

1,2

Comments

Trivially numbers in A037124 satisfy this but are not contained in this sequence.

Links

Table of n, a(n) for n=1..44.

Example

35-3*5 = 20 is divisible by the highest power of 10 below it (10^1). So 20 is a member of this sequence.

Prog

(PARI) DP(n)={p=1; d=digits(n); for(i=1, #d, p*=d[i]); return(p)}
for(k=1, 10^7, if(n%10!=0&&(n-DP(n))%(10^(#Str(n-DP(n))-1))==0, print1(n, ", ")))

Crossrefs

Cf. A055642, A037124, A242948.

Sequence in context: A173646 A274125 A070698 * A167619 A020664 A055570

Adjacent sequences: A243076 A243077 A243078 * A243080 A243081 A243082

Keyword

nonn,base,fini,full

Author

Derek Orr, May 30 2014

Status

approved