A180077 - OEIS

%I #8 Aug 11 2014 22:45:44

%S 0,1,3,5,2,7,11,4,9,13,6,19,15,23,27,49,8,21,17,12,25,29,37,43,33,10,

%T 47,58,14,99,56,62,31,39,20,45,35,16,93,127,24,60,106,28,75,143,50,64,

%U 71,79,41,95,22,68,129,18,164,148,120,112,141,26,110,108,30,89,77,38,91,52

%N Inverse permutation to A180076.

%C A180079(n) = a(a(n));

%C a(A180078(n)) = A180078(a(n)) = A180076(n).

%H Reinhard Zumkeller, <a href="/A180077/b180077.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); import Data.Maybe (fromJust)

%o a180077 = fromJust . (`elemIndex` a180076_list)

%o -- _Reinhard Zumkeller_, Mar 13 2014

%K nonn

%O 0,3

%A _Reinhard Zumkeller_, Aug 14 2010