login
Inverse permutation to A105025.
3

%I #10 Mar 22 2022 00:10:36

%S 0,1,3,2,4,7,6,5,15,10,9,8,11,14,13,12,22,17,16,31,18,21,20,19,30,25,

%T 24,23,26,29,28,27,37,32,63,46,33,36,35,34,45,40,39,38,41,44,43,42,53,

%U 48,47,62,49,52,51,50,61,56,55,54,57,60,59,58,68,127,94

%N Inverse permutation to A105025.

%H Reinhard Zumkeller, <a href="/A214416/b214416.txt">Table of n, a(n) for n = 0..10000</a>

%H <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>

%o (Haskell)

%o import Data.List (elemIndex)

%o import Data.Maybe (fromJust)

%o a214416 = fromJust . (`elemIndex` a105025_list)

%Y Cf. A214417, A105271 (fixed points).

%K nonn

%O 0,3

%A _Reinhard Zumkeller_, Jul 21 2012