A188283 Numbers k such that iterations for the map r -> A061602(r) starting with k ends with a fixed point (factorions A014080).

0, 1, 2, 10, 11, 145, 154, 223, 232, 322, 405, 415, 450, 451, 504, 514, 540, 541, 569, 596, 659, 695, 956, 965, 1023, 1032, 1123, 1132, 1203, 1213, 1223, 1230, 1231, 1232, 1302, 1312, 1320, 1321, 1322, 1449, 1494, 1569, 1596, 1659, 1695, 1944, 1956, 1965, 2003

Offset

1,3

Comments

If k is a term, then (10^k - 1)/9 is also a term. - Jinyuan Wang, Nov 07 2020

Links

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

Example

Number 405 is in sequence because 405 -> 145 -> 145 -> ...

Prog

(PARI) is(k) = {my(t=k, v=List([k])); while(t=sum(i=1, #d=digits(t), d[i]!), if(t==v[#v], return(1), if(sum(i=1, #v-1, t==v[i]), return(0))); listput(v, t)); } \\ Jinyuan Wang, Nov 07 2020

Crossrefs

Supersequence of A014080 (factorions).

Cf. A061602, A173447, A188284.

Sequence in context: A265747 A104459 A008560 * A174703 A258081 A300907

Adjacent sequences: A188280 A188281 A188282 * A188284 A188285 A188286

Keyword

nonn,base

Author

Jaroslav Krizek, Mar 26 2011

Extensions

Missing terms a(1) and a(8)-a(10) aded by Jaroslav Krizek, Jan 28 2012

Name corrected and more terms from Jinyuan Wang, Nov 07 2020

Status

approved