%I #11 Jul 13 2013 12:04:08
%S 1,1886,3771,5656,7541,9059,9216,9373,9530,9687,9844,2,159,316,473,
%T 630,787,944,1101,1258,1415,1572,1729,1887,2044,2201,2358,2515,2672,
%U 2829,2986,3143,3300,3457,3614,3772,3929,4086,4243,4400,4557,4714,4871,5028,5185
%N Inverse permutation to A190132.
%C a(A190132(n)) = A190132(a(n)) = n.
%H Reinhard Zumkeller, <a href="/A190133/b190133.txt">Table of n, a(n) for n = 1..10000</a> (full sequence)
%o (Haskell)
%o import Data.List (elemIndex)
%o import Data.Maybe (fromJust)
%o a190133 n = a190133_list !! (n-1)
%o a190133_list =
%o map (succ . fromJust . (`elemIndex` a190132_list)) [1..10000]
%K nonn,base,fini,full
%O 1,2
%A _Reinhard Zumkeller_, May 06 2011
|