[go: up one dir, main page]

login
A038574
Write n in ternary, sort digits into increasing order.
10
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
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
Sequence in context: A321301 A359058 A191379 * A212713 A072014 A213526
KEYWORD
nonn,base,easy
EXTENSIONS
More terms from Erich Friedman.
STATUS
approved