|
%I #8 Mar 22 2022 00:10:49
%S 1,12,2,13,3,14,4,15,5,16,6,18,7,20,8,22,9,24,10,31,11,32,17,33,19,34,
%T 21,35,23,36,25,38,26,40,27,42,28,44,29,51,30,52,37,53,39,54,41,55,43,
%U 56,45,58,46,60,47,62,48,64,49,71,50,72,57,73,59,74,61
%N Inverse permutation to A238704.
%H Reinhard Zumkeller, <a href="/A238718/b238718.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 a238718 = (+ 1) . fromJust . (`elemIndex` a238704_list)
%K nonn,base
%O 1,2
%A _Reinhard Zumkeller_, Mar 03 2014
|
