login
Inverse permutation to A055266.
3

%I #10 Mar 22 2022 00:11:17

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

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

%U 49,51,53,52,54,56,55,57,58,59,60,61,62,63,65,64,66,67

%N Inverse permutation to A055266.

%H Reinhard Zumkeller, <a href="/A249920/b249920.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 a249920 = (+ 1) . fromJust . (`elemIndex` a055266_list)

%Y Cf. A055266, A249918.

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Jan 14 2015