This site is supported by donations to The OEIS Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A276344 Permutation of natural numbers: a(1) = 1; a(A005187(1+n)) = A087686(1+a(n)), a(A055938(n)) = A088359(a(n)), where A088359 & A087686 = numbers that occur only once & more than once in A004001. 5
 1, 3, 2, 7, 6, 5, 4, 15, 13, 14, 12, 11, 10, 9, 8, 31, 28, 29, 30, 23, 25, 27, 26, 22, 24, 21, 20, 19, 18, 17, 16, 63, 59, 60, 61, 50, 52, 62, 53, 55, 56, 58, 41, 44, 49, 57, 51, 46, 54, 48, 40, 43, 47, 45, 39, 42, 38, 37, 36, 35, 34, 33, 32, 127, 122, 123, 124, 108, 110, 125, 111, 113, 114, 126, 89, 92, 117, 115, 118, 94, 119, 121 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Antti Karttunen, Table of n, a(n) for n = 1..8191 FORMULA a(1)=1; for n > 1, if A079559(n)=1 [when n is in A005187], a(n) = A087686(1+a(A213714(n)-1)), otherwise a(n) = A088359(a(A234017(n))). As a composition of other permutations: a(n) = A267112(A233275(n)). a(n) = A276442(A233277(n)). PROG (Scheme) (definec (A276344 n) (cond ((< n 2) n) ((not (zero? (A079559 n))) (A087686 (+ 1 (A276344 (- (A213714 n) 1))))) (else (A088359 (A276344 (A234017 n)))))) CROSSREFS Inverse: A276343. Cf. A004001, A005187, A055938, A079559, A087686, A088359, A213714, A234017. Similar or related permutations: A233275, A233277, A267112, A276346, A276442. Sequence in context: A228993 A083569 A071574 * A276343 A054429 A269398 Adjacent sequences:  A276341 A276342 A276343 * A276345 A276346 A276347 KEYWORD nonn,base AUTHOR Antti Karttunen, Sep 03 2016 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 January 19 16:49 EST 2019. Contains 319309 sequences. (Running on oeis4.)