login
A276343
Permutation of natural numbers: a(1) = 1, a(A087686(1+n)) = A005187(1+a(n)), a(A088359(n)) = A055938(a(n)), where A088359 & A087686 = numbers that occur only once & more than once in A004001.
5
1, 3, 2, 7, 6, 5, 4, 15, 14, 13, 12, 11, 9, 10, 8, 31, 30, 29, 28, 27, 26, 24, 20, 25, 21, 23, 22, 17, 18, 19, 16, 63, 62, 61, 60, 59, 58, 57, 55, 51, 43, 56, 52, 44, 54, 48, 53, 50, 45, 36, 47, 37, 39, 49, 40, 41, 46, 42, 33, 34, 35, 38, 32, 127, 126, 125, 124, 123, 122, 121, 120, 118, 114, 106, 90, 119, 115, 107, 91, 117, 111, 99
OFFSET
1,2
FORMULA
a(1) = 1; for n > 1, if A093879(n-1) = 0 [when n is in A087686], a(n) = A005187(1+a(A080677(n)-1)), otherwise [when n is in A088359], a(n) = A055938(a(A004001(n)-1)).
As a composition of other permutations:
a(n) = A233276(A267111(n)).
a(n) = A233278(A276441(n)).
PROG
(Scheme)
(definec (A276343 n) (cond ((< n 2) n) ((zero? (A093879 (- n 1))) (A005187 (+ 1 (A276343 (+ -1 (A080677 n)))))) (else (A055938 (A276343 (+ -1 (A004001 n)))))))
CROSSREFS
Inverse: A276344.
Similar or related permutations: A233276, A233278, A267111, A276345, A276441.
Compare also to the scatter-plots of A276443 and A276445.
Sequence in context: A276344 A334727 A341335 * A054429 A269398 A269397
KEYWORD
nonn,base,look
AUTHOR
Antti Karttunen, Sep 03 2016
STATUS
approved