The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A260431 Permutation of natural numbers: a(1) = 1, a(A257804(n)) = 2*a(n), a(A257803(1+n)) = 1 + 2*a(n), where A257804 and A257803 give the positions of even and odd terms in A233271, the infinite trunk of inverted binary beanstalk. 5
 1, 2, 4, 3, 8, 6, 5, 16, 9, 12, 10, 7, 32, 18, 24, 20, 17, 13, 14, 64, 11, 36, 33, 19, 25, 48, 21, 40, 34, 15, 26, 28, 128, 65, 37, 22, 72, 49, 66, 38, 41, 35, 50, 96, 42, 80, 68, 30, 27, 52, 56, 29, 129, 23, 73, 256, 67, 130, 74, 39, 44, 144, 98, 51, 97, 132, 76, 43, 82, 81, 70, 100, 69, 31, 53, 57, 257, 192, 84, 160, 131, 75, 45, 136, 60, 54 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Antti Karttunen, Table of n, a(n) for n = 1..10000 FORMULA a(1) = 1; for n > 1, if A257800(n) = 0 [when n is one of the terms of A257804] a(n) = 2*a(A257808(n)), otherwise [when n is one of the terms of A257803] a(n) = 1 + 2*a(A257807(n)-1). As a composition of other permutations: a(n) = A054429(A260433(n)). a(n) = A260433(A260430(n)). PROG (Scheme, with memoizing macro definec) (definec (A260431 n) (cond ((<= n 1) n) ((zero? (A257800 n)) (* 2 (A260431 (A257808 n)))) (else (+ 1 (* 2 (A260431 (+ -1 (A257807 n)))))))) CROSSREFS Inverse: A260432. Related permutations: A260433, A260430, A054429. Cf. A257800, A257803, A257804, A257807, A257808, A233271. Cf. also A257806. Sequence in context: A248513 A266414 A245613 * A333484 A334434 A333485 Adjacent sequences:  A260428 A260429 A260430 * A260432 A260433 A260434 KEYWORD nonn AUTHOR Antti Karttunen, Jul 27 2015 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 24 16:24 EDT 2021. Contains 346273 sequences. (Running on oeis4.)