OFFSET
1,2
COMMENTS
Terms computed by Barry and Theunis de Jong.
LINKS
Eric Angelini, Dec 04 2006, Table of n, a(n) for n = 1..172
EXAMPLE
11 and 13 loop on themselves, but 12 doesn't:
11 -> 13 -> 17 -> 25 -> 28 -> 18 -> 11
12 -> 11 -> 13 -> 17 -> 25 -> 28 -> 18 -> 11
13 -> 17 -> 25 -> 28 -> 18 -> 11 -> 13.
PROG
(PARI) is(n, S=List())=until(setsearch(Set(S), n=A304439(n)), listput(S, n)); n==S[1] \\ M. F. Hasler, May 18 2018
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Eric Angelini, Dec 04 2006
STATUS
approved