|
%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
|
