A241012 - OEIS

%I #13 Mar 22 2022 00:10:52

%S 1,2,4,6,8,3,10,12,14,5,16,7,18,9,11,20,22,13,24,15,17,19,26,21,28,23,

%T 30,25,32,27,34,36,29,31,33,35,38,37,39,41,40,42,43,44,46,48,45,50,47,

%U 52,54,56,49,58,60,62,64,66,51,53,55,68,70,57,72,59,61

%N Inverse permutation to A109465.

%H Reinhard Zumkeller, <a href="/A241012/b241012.txt">Table of n, a(n) for n = 1..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 a241012 = (+ 1) . fromJust . (`elemIndex` a109465_list)

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Aug 07 2014