A279339 a(1) = 1; for n > 1, if n is even, a(n) = A055938(a(n/2)), otherwise a(n) = A005187(a(A064989(n))).

1, 2, 3, 5, 4, 6, 7, 12, 8, 9, 11, 13, 19, 14, 10, 27, 35, 17, 67, 20, 16, 24, 131, 28, 15, 40, 22, 29, 259, 21, 515, 58, 25, 72, 18, 36, 1027, 136, 46, 43, 2051, 33, 4099, 51, 23, 264, 8195, 59, 26, 30, 78, 83, 16387, 45, 31, 60, 142, 520, 32771, 44, 65539, 1032, 38, 121, 47, 52, 131075, 147, 270, 37, 262147, 75, 524291, 2056, 32, 275, 34, 93

Offset

1,2

Comments

A more recursed variant of A279337.

Links

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

Index entries for sequences that are permutations of the natural numbers

Formula

a(1) = 1; for n > 1, if n is even, a(n) = A055938(a(n/2)), otherwise a(n) = A005187(a(A064989(n))).

As a composition of other permutations:

a(n) = A279342(A243071(n)).

a(n) = A279344(A156552(n)).

Prog

(Scheme)
(definec (A279339 n) (cond ((= 1 n) n) ((even? n) (A055938 (A279339 (/ n 2)))) (else (A005187 (A279339 (A064989 n))))))

Crossrefs

Inverse: A279338.

Cf. A005187, A055938, A064989.

Related or similar permutations: A156552, A243071, A279337, A279342, A279344.

Sequence in context: A081241 A180201 A233277 * A279349 A233278 A075168

Adjacent sequences: A279336 A279337 A279338 * A279340 A279341 A279342

Keyword

nonn

Author

Antti Karttunen, Dec 10 2016

Status

approved