This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A270196 #7 Mar 15 2016 00:16:57 %S A270196 1,2,3,4,7,6,5,8,13,14,15,12,17,10,25,16,11,26,9,28,21,30,27,24,57,34, %T A270196 53,20,31,50,49,32,101,22,35,52,65,18,29,56,51,42,105,60,69,54,23,48, %U A270196 85,114,97,68,19,106,121,40,37,62,43,100,33,98,229,64,55,202,197,44,405,70,115,104,89,130,209,36,107,58,261,112,61 %N A270196 Permutation of natural numbers: a(1) = 1, a(2n) = 2*a(n), a(A269369(1+n)) = 1 + 2*a(n). %H A270196 Antti Karttunen, <a href="/A270196/b270196.txt">Table of n, a(n) for n = 1..8191</a> %H A270196 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A270196 a(1) = 1, after which for even n, a(n) = 2*a(n/2), for odd n, a(n) = 1 + 2*a(A269370(n)-1). %o A270196 (Scheme, with memoization-macro definec) %o A270196 (definec (A270196 n) (cond ((<= n 1) n) ((even? n) (* 2 (A270196 (/ n 2)))) (else (+ 1 (* 2 (A270196 (- (A269370 n) 1))))))) %Y A270196 Inverse: A270195. %Y A270196 Cf. A269369, A269370. %Y A270196 Related or similar permutations: A269866, A269373, A269376, A270197. %K A270196 nonn %O A270196 1,2 %A A270196 _Antti Karttunen_, Mar 13 2016