A065307 - OEIS

%I #13 May 27 2021 09:15:15

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

%T 23,27,28,33,30,31,34,35,32,41,36,38,37,39,40,42,43,51,44,45,52,46,48,

%U 53,47,54,58,49,55,67,50,56,57,62,59,60,63,64,61,74,65,68,66,69,70,79

%N "Inverse" to A065306.

%H Reinhard Zumkeller, <a href="/A065307/b065307.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)

%o import Data.Maybe (fromJust)

%o a065307 n = (fromJust $ elemIndex n a065306_list) + 1

%o -- _Reinhard Zumkeller_, Jan 30 2012

%Y Cf. A065305, A065306.

%Y Cf. A205666 (fixed points).

%K nice,nonn

%O 1,2

%A Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Oct 29 2001