A075162 Position of A014486(n) in A075165, minus one.

0, 1, 2, 3, 4, 5, 8, 7, 15, 6, 9, 14, 11, 23, 24, 17, 26, 31, 63, 80, 511, 255, 65535, 10, 13, 20, 19, 39, 34, 29, 44, 47, 95, 134, 767, 383, 98303, 48, 49, 74, 35, 71, 124, 53, 242, 127, 1023, 728, 32767, 4095, 16777215, 624, 161, 19682, 33554431, 262143, 6560

Offset

0,3

Comments

See A075166.

Links

Table of n, a(n) for n=0..56.

A. Karttunen, Alternative Catalan Orderings (with the complete Scheme source)

Index entries for sequences that are permutations of the natural numbers

Prog

(Scheme) ;; Functions showing the essential idea. For the complete source, follow the "Alternative Catalan Orderings" link:
(define (A075162 n) (-1+ (parenthesization->primefactorization (binexp->parenthesization (A014486 n)))))
(define (parenthesization->primefactorization p) (Nvector->primefactorization! (map parenthesization->primefactorization p)))
(define (Nvector->primefactorization! el) (let loop ((el (reverse! el)) (i 1) (z 1)) (cond ((null? el) z) ((null? (cdr el)) (* (expt (A008578 i) (car el)) z)) (else (loop (cdr el) (1+ i) (* (expt (A008578 i) (-1+ (car el))) z))))))

Crossrefs

Inverse of A075161. a(n) = A075164(n+1)-1. Cf. A075157, A075169.

Sequence in context: A091893 A074756 A240221 * A056240 A069968 A298882

Adjacent sequences: A075159 A075160 A075161 * A075163 A075164 A075165

Keyword

nonn

Author

Antti Karttunen, Sep 13 2002

Status

approved