|
|
A140316
|
|
Write n in base 3, delete 0's.
|
|
0
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|