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,3

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

Example

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

Mathematica

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

Crossrefs

Cf. A038573, A004185.

Sequence in context: A321301 A359058 A191379 * A212713 A072014 A213526

Adjacent sequences: A038571 A038572 A038573 * A038575 A038576 A038577

Keyword

nonn,base,easy

Author

N. J. A. Sloane

Extensions

More terms from Erich Friedman.

Status

approved