A246206 - OEIS

A246206

Permutation of natural numbers: a(1) = 1, if A117966(n) < 0, a(n) = A014580(a(-(A117966(n)))), otherwise a(n) = A091242(a(A117966(n)-1)).

1, 2, 5, 9, 4, 13, 3, 37, 49, 64, 6, 10, 16, 81, 8, 20, 15, 351, 229, 451, 59, 11, 7, 41, 19, 73, 92, 114, 27, 36, 48, 140, 12, 53, 17, 24, 33, 69, 86, 107, 44, 170, 18, 63, 22, 410, 28, 524, 76, 271, 101, 14, 23, 687, 529, 895, 253, 25, 97, 213, 145, 333, 3413, 67, 2091, 31, 607, 103, 415, 4531, 47, 131, 87, 193, 55

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

Compare to the formula for A246164. However, instead of reversing binary representation, we employ here balanced ternary enumeration of integers (see A117966).

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..231

Index entries for sequences operating on GF(2)[X]-polynomials

Index entries for sequences that are permutations of the natural numbers

FORMULA

a(1) = 1, and for n > 1, if A117966(n) < 0, then a(n) = A014580(a(-(A117966(n)))), otherwise a(n) = A091242(a(A117966(n)-1)).

As a composition of related permutations:

a(n) = A245702(A246208(n)).

a(n) = A246202(A246210(n)).

PROG

(Scheme, with memoization-macro definec)

(definec (A246206 n) (cond ((= 1 n) n) ((negative? (A117966 n)) (A014580 (A246206 (- (A117966 n))))) (else (A091242 (A246206 (- (A117966 n) 1))))))