A140316 Write n in base 3, delete 0's.

1, 2, 1, 11, 12, 2, 21, 22, 1, 11, 12, 11, 111, 112, 12, 121, 122, 2, 21, 22, 21, 211, 212, 22, 221, 222, 1, 11, 12, 11, 111, 112, 12, 121, 122, 11, 111, 112, 111, 1111, 1112, 112, 1121, 1122, 12, 121, 122, 121, 1211, 1212, 122, 1221, 1222, 2, 21, 22, 21, 211, 212, 22

Offset

1,2

Comments

This is to A038585 as A007088 is to A007089.

Links

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

Example

a(29) = 12 because 29 base 3 = A007089(29) = 1002 and upon deleting 0's, this becomes 12. Note the fixed points (input in decimal, output in zeroless base 3) begin 1, 2, 21, 111, ... with for example, 21 base 10 becoming 21 base 3 = A007089(21) = 210 and upon deleting 0's, this becomes 21 again; and 111 base 10 becoming A007089(111) = 11010 and upon deleting 0's, this becomes 111 again.

Mathematica

Table[FromDigits[DeleteCases[IntegerDigits[n, 3], 0]], {n, 60}] (* Harvey P. Dale, Oct 23 2011 *)

Crossrefs

Cf. A007088, A007089, A038585.

Sequence in context: A213302 A308846 A038586 * A295852 A088587 A305711

Adjacent sequences: A140313 A140314 A140315 * A140317 A140318 A140319

Keyword

base,easy,nonn

Author

Jonathan Vos Post, May 26 2008

Status

approved