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 A269373 #7 Mar 06 2016 23:24:07 %S A269373 1,2,3,6,5,4,11,8,9,10,7,16,21,32,15,22,17,12,19,64,13,18,31,128,41, %T A269373 24,63,14,29,256,43,512,33,42,23,1024,37,20,127,30,25,2048,35,48,61, %U A269373 34,255,4096,81,8192,47,38,125,96,27,40,57,26,511,44,85,16384,1023,62,65,32768,83,65536,45,82,2047,131072,73,262144,39 %N A269373 Permutation of natural numbers: a(1) = 1, a(n) = A000079(A260438(n+1)-1) * ((2 * a(A260439(n+1))) - 1). %H A269373 Antti Karttunen, <a href="/A269373/b269373.txt">Table of n, a(n) for n = 1..1024</a> %H A269373 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A269373 a(1) = 1, a(n) = A000079(A260438(n+1)-1) * ((2 * a(A260439(n+1))) - 1). %F A269373 Other identities. For all n >= 0: %F A269373 A000035(a(n)) = A000035(n). [This permutation preserves the parity of n.] %o A269373 (Scheme, with memoization-macro definec) %o A269373 (definec (A269373 n) (cond ((<= n 1) n) (else (* (A000079 (- (A260438 (+ 1 n)) 1)) (+ -1 (* 2 (A269373 (A260439 (+ 1 n))))))))) %Y A269373 Inverse: A269374. %Y A269373 Cf. A000035, A000079, A260438, A260439. %Y A269373 Cf. also A249813, A269383. %K A269373 nonn %O A269373 1,2 %A A269373 _Antti Karttunen_, Mar 01 2016