A094512 Inverse of A094511.

2, 1, 5, 3, 6, 7, 11, 4, 10, 9, 13, 14, 15, 19, 23, 8, 12, 17, 21, 18, 22, 25, 27, 20, 26, 28, 29, 30, 31, 39, 47, 16, 24, 33, 37, 34, 35, 41, 43, 36, 38, 44, 45, 42, 46, 51, 55, 40, 50, 49, 53, 54, 57, 58, 59, 52, 60, 61, 62, 63, 79, 87, 95, 32, 48, 56, 69, 65, 67, 71, 75, 66

Offset: 1

Author

Reinhard Zumkeller, May 06 2004

Keywords

• nonn

Comments

Permutation of the natural numbers: A094511(a(n))=a(A094511(n))=n.

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
• Index entries for sequences that are permutations of the natural numbers

Crossrefs

Cf. A007088, A000120, A094514.

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a094512 = (+ 1) . fromJust . (`elemIndex` a094511_list)
-- Reinhard Zumkeller, Nov 23 2014