|
%I #23 Sep 04 2020 19:46:38
%S 1,3,2,7,4,5,6,11,8,13,10,15,12,9,14,19,16,29,18,23,20,17,22,27,24,21,
%T 26,31,28,25,30,35,32,45,34,39,36,33,38,43,40,53,42,47,44,41,46,51,48,
%U 61,50,55,52,49,54,59,56,37,58,63,60,57,62
%N Permutation of nonnegative integers that converts A162912 into A162911.
%C For n > 0, A162912(a(n)) = A162911(n), as well as A162912(A054429(n)) = A162911(n). There is a self-inverse permutation, b, such that a(b(n)) = A054429(n), and a(n) = A054429(b(n)).
%H Yosu Yurramendi, <a href="/A334998/b334998.txt">Table of n, a(n) for n = 1..4095</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%o (R)
%o #
%o nmax <- 31
%o A334998 <- 1; A334999 <- 1
%o for(n in 1:31) {
%o A334998[2*n ] <- 2*A334999[n]+1
%o A334998[2*n+1] <- 2*n
%o A334999[2*n ] <- 2*n+1
%o A334999[2*n+1] <- 2*A334998[n]
%o }
%o A334998; A334999
%Y Cf. A334999 (inverse), A054429, A162911, A162912.
%K nonn
%O 1,2
%A _Yosu Yurramendi_, May 19 2020
|
