A038574 Write n in ternary, sort digits into increasing order.

0, 1, 2, 1, 4, 5, 2, 5, 8, 1, 4, 5, 4, 13, 14, 5, 14, 17, 2, 5, 8, 5, 14, 17, 8, 17, 26, 1, 4, 5, 4, 13, 14, 5, 14, 17, 4, 13, 14, 13, 40, 41, 14, 41, 44, 5, 14, 17, 14, 41, 44, 17, 44, 53, 2, 5, 8, 5, 14, 17, 8, 17, 26, 5, 14, 17, 14, 41, 44, 17, 44, 53, 8, 17, 26, 17, 44, 53, 26, 53, 80

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

Examples

			15 = 120 -> 012 = 5, so a(15)=5.
		

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..10000
• Michael Gilleland, Some Self-Similar Integer Sequences
• Robert Walker, Self Similar Sloth Canon Number Sequences

Crossrefs

Cf. A038573, A004185.

Programs

Mathematica

Table[FromDigits[Sort[IntegerDigits[n,3]],3],{n,0,90}] (* Harvey P. Dale, Dec 08 2015 *)

Extensions

More terms from Erich Friedman.