

A334676


a(n) is the least number that can be reached starting from n and iterating the nondeterministic map x > x/d where d is a nonzero digit of x dividing x.


3



1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 11, 1, 13, 14, 1, 16, 17, 18, 19, 10, 21, 11, 23, 1, 1, 13, 27, 14, 29, 10, 31, 16, 11, 34, 1, 1, 37, 38, 13, 10, 41, 21, 43, 11, 1, 46, 47, 1, 49, 10, 51, 13, 53, 54, 11, 56, 57, 58, 59, 10, 61, 31, 21, 16, 13, 11, 67, 68, 69
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,10


COMMENTS

See A336580 for the positions of 1's.


LINKS

Rémy Sigrist, Table of n, a(n) for n = 1..10000


FORMULA

a(a(n)) = a(n).


EXAMPLE

For n = 168:
 168 / 6 = 28, 28 / 2 = 14,
 168 / 8 = 21,
 so a(168) = 14.


PROG

(PARI) for (n=1, #a=vector(69, k, k), apply (d > a[n]=min(a[n], a[n/d]), setintersect(Set(digits(n)), divisors(n))); print1 (a[n]", "))


CROSSREFS

See A334684 for a similar sequence.
Cf. A336580.
Sequence in context: A284201 A324660 A336035 * A176998 A328752 A173821
Adjacent sequences: A334673 A334674 A334675 * A334677 A334678 A334679


KEYWORD

nonn,base


AUTHOR

Rémy Sigrist, Jul 25 2020


STATUS

approved



