A238862 Inverse permutation to A239965.

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

Offset: 1

Author

Reinhard Zumkeller, Apr 30 2014

Keywords

• nonn

Comments

a(A239965(n)) = A239965(a(n)) = n;

A018252(a(n)) = A240024(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. A239943 (fixed points).

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a238862 = (+ 1) . fromJust . (`elemIndex` a239965_list)