A252023 Inverse permutation to A252022.

1, 2, 3, 4, 5, 7, 9, 15, 21, 6, 8, 10, 11, 12, 13, 17, 19, 23, 41, 14, 16, 18, 25, 26, 27, 29, 34, 43, 50, 20, 24, 28, 30, 31, 32, 36, 45, 53, 58, 22, 33, 35, 37, 38, 39, 47, 56, 60, 90, 40, 44, 46, 48, 62, 64, 74, 80, 92, 105, 42, 54, 66, 68, 76, 78, 82, 94

Offset: 1

Author

Reinhard Zumkeller, Dec 12 2014

Keywords

• nonn
• look

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. A252022 (inverse), A252079 (fixed points).

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a252023 = (+ 1) . fromJust . (`elemIndex` a252022_list)