login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A126918
Inverse permutation to sequence A126917.
4
1, 2, 3, 5, 4, 7, 11, 6, 13, 9, 8, 17, 19, 10, 23, 29, 12, 15, 31, 14, 37, 41, 16, 25, 21, 18, 43, 47, 20, 53, 59, 22, 27, 35, 24, 61, 67, 26, 71, 33, 28, 73, 49, 30, 79, 83, 32, 39, 89, 34, 97, 101, 36, 55, 45, 38, 103, 107, 40, 109, 113, 42, 51, 65, 44, 127, 77, 46, 131, 57
OFFSET
1,2
PROG
(Scheme, requiring also defineperm1-macro from Antti Karttunen's IntSeq-library)
(define (A126918 n) (A126917 (- n))) ;; When A126917 is defined with defineperm1-macro, it will automatically cache also the inverse values, which are then available with negative arguments.
;; Antti Karttunen, Jun 20 2014
CROSSREFS
Sequence in context: A114461 A065578 A254104 * A250472 A291588 A064620
KEYWORD
nonn
AUTHOR
Leroy Quet, Dec 31 2006
EXTENSIONS
Extended by Ray Chandler, Jan 04 2007
STATUS
approved