A245604 - OEIS

%I #10 Jul 29 2014 13:49:26

%S 1,2,4,3,6,7,10,5,9,11,15,12,16,18,24,8,14,17,22,19,25,28,35,20,26,29,

%T 36,31,39,44,55,13,21,27,34,30,38,42,51,32,40,45,56,50,60,67,81,37,46,

%U 47,57,52,62,68,82,59,65,72,86,79,93,105,121,23,33,41,49,48,58,66,77,53,64,71,85,76,90,99,111,61

%N Permutation of natural numbers: a(1)=1, a(2n) = A026424(a(n)), a(2n+1) = A028260(1+a(n)).

%H Antti Karttunen, <a href="/A245604/b245604.txt">Table of n, a(n) for n = 1..10001</a>

%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>

%F a(1)=1, a(2n) = A026424(a(n)), a(2n+1) = A028260(1+a(n)).

%F As a composition of related permutations:

%F a(n) = A245614(A244322(n)).

%F For all n >= 1, A066829(a(n)) = 1 - A000035(n). [Permutation A143691 has the same property].

%F Equally, A066829(a(n)*a(n+1)) = 1 for all n.

%o (Scheme, with memoization macro definec)

%o (definec (A245604 n) (cond ((= 1 n) 1) ((even? n) (A026424 (A245604 (/ n 2)))) (else (A028260 (+ 1 (A245604 (/ (- n 1) 2)))))))

%Y Inverse: A245603.

%Y Similar permutations: A143691, A244152, A244322, A245614, A245606, A245608.

%K nonn

%O 1,2

%A _Antti Karttunen_, Jul 27 2014