A252002 Inverse permutation to A252001.

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

Offset: 1

Author

Reinhard Zumkeller, Dec 12 2014

Keywords

• nonn

Links

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

Crossrefs

Cf. A252001 (inverse), A252078 (fixed points).

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a252002 = (+ 1) . fromJust . (`elemIndex` a252001_list)