A245711 - OEIS

%I #6 Aug 11 2014 22:22:49

%S 1,2,3,5,7,4,19,10,35,9,17,139,107,6,37,36,23,13,555,229,87,22,275,

%T 1676,39,11,27,68,63,326,137,28,4435,18,53,147,25,8,6819,9388,995,16,

%U 155,73,3659,14,533,838,145,20,49,851,29,587,535,403,4179,26,501,1059,1611,1163,69,152,663,51,283,222,181,21

%N Permutation of natural numbers, odd bisection of A245705 incremented by one and halved: a(n) = (1+A245705((2*n)-1)) / 2.

%H Antti Karttunen, <a href="/A245711/b245711.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(n) = (1+A245705((2*n)-1)) / 2.

%o (PARI)

%o A245711(n) = (1+A245705((2*n)-1))/2;

%o for(n=1, 10001, write("b245711.txt", n, " ", A245711(n)));

%o \\ For the rest of code, see under A245705.

%o (Scheme) (define (A245711 n) (/ (+ 1 (A245705 (+ n n -1))) 2))

%Y Inverse: A245712.

%Y Cf. A245705, A245605.

%K nonn

%O 1,2

%A _Antti Karttunen_, Jul 30 2014