login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A269856
Permutation of natural numbers: a(1) = 0, a(2) = 1, a(2n) = A001969(1+a(n)), a(2n+1) = A000069(1+a(A268674(2n+1))).
3
0, 1, 2, 3, 4, 5, 8, 6, 7, 9, 16, 10, 32, 17, 11, 12, 64, 15, 128, 18, 13, 33, 256, 20, 14, 65, 19, 34, 512, 23, 1024, 24, 21, 129, 22, 30, 2048, 257, 35, 36, 4096, 27, 8192, 66, 25, 513, 16384, 40, 28, 29, 31, 130, 32768, 39, 26, 68, 37, 1025, 65536, 46, 131072, 2049, 67, 48, 38, 43, 262144, 258, 41, 45, 524288, 60
OFFSET
1,3
COMMENTS
Note the indexing: Domain starts from 1, range from 0.
FORMULA
a(1) = 0, a(2) = 1, a(2n) = A001969(1+a(n)), a(2n+1) = A000069(1+a(A268674(2n+1))).
As a composition of other permutations:
a(n) = A003188(A252756(n)).
PROG
(Scheme, with memoization-macro definec)
(definec (A269856 n) (cond ((<= n 2) (- n 1)) ((even? n) (A001969 (+ 1 (A269856 (/ n 2))))) (else (A000069 (+ 1 (A269856 (A268674 n)))))))
CROSSREFS
Inverse: A269855.
Related or similar permutations: A003188, A252756, A269852.
Sequence in context: A370794 A162371 A376147 * A146941 A194067 A191710
KEYWORD
nonn
AUTHOR
Antti Karttunen, Mar 07 2016
STATUS
approved