A243344 a(1) = 1, a(2n) = A013929(a(n)), a(2n+1) = A005117(1+a(n)).

1, 4, 2, 12, 6, 8, 3, 32, 19, 18, 10, 24, 13, 9, 5, 84, 53, 50, 31, 49, 30, 27, 15, 63, 38, 36, 21, 25, 14, 16, 7, 220, 138, 136, 86, 128, 82, 81, 51, 126, 79, 80, 47, 72, 42, 44, 23, 162, 103, 99, 62, 96, 59, 54, 34, 64, 39, 40, 22, 45, 26, 20, 11, 564, 365

Offset

1,2

Comments

This permutation entangles complementary pair odd/even numbers (A005408/A005843) with complementary pair A005117/A013929 (numbers which are squarefree/not squarefree).

Links

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

Index entries for sequences that are permutations of the natural numbers

Formula

a(1) = 1, a(2n) = A013929(a(n)), a(2n+1) = A005117(1+a(n)).

For all n, A008966(a(n)) = A000035(n), or equally, mu(a(n)) = n modulo 2, where mu is Moebius mu (A008683). [The same property holds for A088610.]

Prog

(Scheme, with memoizing definec-macro from Antti Karttunen's IntSeq-library)
(definec (A243344 n) (cond ((<= n 1) n) ((even? n) (A013929 (A243344 (/ n 2)))) (else (A005117 (+ 1 (A243344 (/ (- n 1) 2)))))))

Crossrefs

Inverse: A243343.

Cf. A005843, A005408, A008966, A005117, A013929, A013928, A057627.

Similar permutations: A088610 (simple variant), A243345-A243346, A243347, A243287-A243288, A135141-A227413, A237126-A237427, A193231.

Sequence in context: A077016 A191436 A260434 * A293603 A201825 A104007

Adjacent sequences: A243341 A243342 A243343 * A243345 A243346 A243347

Keyword

nonn

Author

Antti Karttunen, Jun 03 2014

Status

approved