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 A279348 #7 Dec 14 2016 23:39:38 %S A279348 1,2,3,5,4,6,7,9,10,15,11,8,12,14,25,27,18,35,13,20,30,21,33,22,39,49, %T A279348 16,24,28,50,65,51,54,77,17,36,70,57,87,26,55,85,40,60,42,63,95,66, %U A279348 121,45,44,78,69,81,98,147,119,32,48,56,100,130,125,159,102,143,19,108,154,105,207,34,145,215,72,140,114,75,91,174,133,117,52 %N A279348 a(1) = 1, for n > 1, if A079559(n) = 0, a(n) = 2*a(A256992(n)), otherwise a(n) = A250469(a(A256992(n))). %H A279348 Antti Karttunen, <a href="/A279348/b279348.txt">Table of n, a(n) for n = 1..8192</a> %H A279348 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A279348 a(1) = 1, for n > 1, if A079559(n) = 0 [when n is a term of A055938], a(n) = 2*a(A256992(n)), otherwise a(n) = A250469(a(A256992(n))). %F A279348 As a composition of other permutations: %F A279348 a(n) = A250245(A279338(n)). %F A279348 a(n) = A252753(A279343(n)). %F A279348 a(n) = A252755(A279341(n)). %o A279348 (Scheme) (definec (A279348 n) (cond ((= 1 n) n) ((zero? (A079559 n)) (* 2 (A279348 (A256992 n)))) (else (A250469 (A279348 (A256992 n)))))) %Y A279348 Inverse: A279349. %Y A279348 Cf. A005187, A055938, A079559, A250469, A256992. %Y A279348 Related or similar permutations: A250245, A252753, A252755, A279338, A279341, A279343. %K A279348 nonn %O A279348 1,2 %A A279348 _Antti Karttunen_, Dec 12 2016