|
%I
%S 1,3,5,7,9,8,6,4,2,90,18,16,14,12,10,11,13,15,17,79,20,22,24,26,28,27,
%T 25,23,19,68,39,35,33,31,29,30,32,34,21,43,41,37,45,47,49,48,46,36,38,
%U 51,52,53,54,55,50,56,57,58,40,42,44,59,60,61,62,63,64
%N Inverse permutation to A252001.
%H Reinhard Zumkeller, <a href="/A252002/b252002.txt">Table of n, a(n) for n = 1..9999</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 a252002 = (+ 1) . fromJust . (`elemIndex` a252001_list)
%Y Cf. A252001 (inverse), A252078 (fixed points).
%K nonn
%O 1,2
%A _Reinhard Zumkeller_, Dec 12 2014
|
