OFFSET
1,1
COMMENTS
We require that k has a digit > 1 in order to exclude "trivial" solutions like k = 1 or k = 10 or (if those are forbidden) k = 10^m + 1 where m is about half the length of n, e.g., k = 11 for most 2-digit numbers ab => 11*ab = a(a+b)b.
FORMULA
a(n) = A381700(n)/n.
EXAMPLE
26 is the smallest positive integer with digits greater than 1, and when multiplied by 16, it produces 416. The resulting product, 416, contains the digits 1 and 6, which are the distinct digits of 16. Therefore, a(16) = 26.
PROG
(PARI) apply( {A381946(n)=my(S=Set(digits(n))); for(k=2, oo, #setminus(S, Set(digits(k*n))) || vecmax(digits(k))<2 || return(k))}, [1..99])
(PARI) a(n) = my(d=digits(n), s=Set(d), k=2); while (!((#select(x->(x>1), digits(k)) >= 1) && (setintersect(Set(digits(k*n)), s) == s)), k++); k; \\ Michel Marcus, Mar 11 2025
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler and Ali Sada, Mar 10 2025
EXTENSIONS
More terms from Michel Marcus, Mar 11 2025
STATUS
approved
