A260742 Permutation of natural numbers: a(1) = 1, for n > 1: a(n) = A255551(A260738(n), a(A260739(n))).

1, 2, 3, 4, 7, 6, 9, 8, 5, 14, 13, 12, 15, 18, 11, 16, 21, 10, 19, 28, 17, 26, 25, 24, 31, 30, 35, 36, 33, 22, 27, 32, 29, 42, 39, 20, 37, 38, 47, 56, 43, 34, 49, 52, 41, 50, 51, 48, 61, 62, 23, 60, 63, 70, 45, 72, 77, 66, 57, 44, 67, 54, 71, 64, 123, 58, 69, 84, 65, 78, 73, 40, 55, 74, 83, 76, 75, 94, 103, 112, 101, 86, 79, 68, 91, 98, 59, 104, 87, 82, 93, 100, 89, 102

Offset

1,2

Comments

This is a more recursed variant of A260436.

Links

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

Index entries for sequences that are permutations of the natural numbers

Formula

a(1) = 1, for n > 1: a(n) = A255551(A260738(n), a(A260739(n))).

Other identities. For all n >= 1:

a(A003309(n+2)) = A000959(n+1). [Maps odd Ludic numbers to Lucky numbers.]

a(n) = a(2n)/2. [The even bisection halved gives the sequence back.]

Prog

(Scheme, with memoization macro definec)
(definec (A260742 n) (if (<= n 1) n (A255551bi (A260738 n) (A260742 (A260739 n))))) ;; Code for A255551bi given in A255551.

Crossrefs

Inverse: A260741.

Cf. A000959, A003309, A255551, A260738, A260739.

Similar permutations: A260436, A250245, A250246.

Sequence in context: A359682 A260436 A255553 * A265228 A374717 A328877

Adjacent sequences: A260739 A260740 A260741 * A260743 A260744 A260745

Keyword

nonn

Author

Antti Karttunen, Jul 30 2015

Status

approved