A321524 Right-rotate nonzero digits in ternary expansion of n and convert back to decimal.

0, 1, 2, 3, 4, 7, 6, 5, 8, 9, 10, 19, 12, 13, 22, 21, 14, 23, 18, 11, 20, 15, 16, 25, 24, 17, 26, 27, 28, 55, 30, 31, 58, 57, 32, 59, 36, 37, 64, 39, 40, 67, 66, 41, 68, 63, 38, 65, 42, 43, 70, 69, 44, 71, 54, 29, 56, 33, 34, 61, 60, 35, 62, 45, 46, 73, 48, 49

Offset: 0

Author

Rémy Sigrist, Nov 12 2018

Keywords

• nonn
• base

Comments

This sequence is a permutation of the nonnegative integers with inverse A321525.

Examples

			The first terms, alongside the corresponding ternary representations, are:
  n   a(n)  ter(n)  ter(a(n))
  --  ----  ------  ---------
   0     0       0          0
   1     1       1          1
   2     2       2          2
   3     3      10         10
   4     4      11         11
   5     7      12         21
   6     6      20         20
   7     5      21         12
   8     8      22         22
   9     9     100        100
  10    10     101        101
  11    19     102        201
  12    12     110        110
  13    13     111        111
  14    22     112        211
  15    21     120        210
  16    14     121        112
  17    23     122        212
		

Links

• Rémy Sigrist, Table of n, a(n) for n = 0..6561
• Index entries for sequences that are permutations of the natural numbers

Crossrefs

Cf. A321464, A321525 (inverse).

Programs

PARI

a(n, base=3) = my (d=digits(n, base), t=select(sign, d), i=-2); for (j=1, #d, if (d[j], d[j]=t[1+(i++%#t)])); fromdigits(d, base)

Formula

a(3 * n) = 3 * a(n).