|
%I #13 Jun 11 2017 13:24:36
%S 0,1,2,3,5,4,6,7,11,10,9,13,8,12,14,15,23,22,21,19,20,18,27,17,26,25,
%T 29,16,24,28,30,31,47,46,45,43,44,42,39,41,38,37,55,40,36,54,35,53,34,
%U 51,59,52,50,33,49,58,57,61,32,48,56,60,62,63,95,94,93,91
%N Permutation of nonnegative integers obtained by entangling complementary pair A005187 & A055938 with odd and even numbers..
%H Antti Karttunen, <a href="/A233277/b233277.txt">Table of n, a(n) for n = 0..8191</a>
%H Indranil Ghosh, <a href="/A233277/a233277.txt">Python program to generate the sequence</a>
%H Indranil Ghosh, <a href="/A233277/a233277_1.txt">PARI program to generate the sequence</a>
%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>
%F a(0)=0, a(1)=1, and thereafter, if A079559(n)=0, a(n) = 2*a(A234017(n)), else a(n) = 1+(2*a(A213714(n)-1)).
%F a(n) = A054429(A233275(n)). [Follows from the definitions of these sequences]
%o (Scheme, with memoizing definec-macro from _Antti Karttunen_'s IntSeq-library)
%o (definec (A233277 n) (cond ((< n 2) n) ((zero? (A079559 n)) (* 2 (A233277 (A234017 n)))) (else (+ 1 (* 2 (A233277 (- (A213714 n) 1)))))))
%Y Inverse permutation: A233278.
%Y Cf. also A079559, A213714, A234017, A054429.
%Y Similarly constructed permutation pairs: A135141/A227413, A232751/A232752, A233275/A233276, A233279/A233280, A003188/A006068.
%K nonn
%O 0,3
%A _Antti Karttunen_, Dec 18 2013
|
