A180077 Inverse permutation to A180076.

0, 1, 3, 5, 2, 7, 11, 4, 9, 13, 6, 19, 15, 23, 27, 49, 8, 21, 17, 12, 25, 29, 37, 43, 33, 10, 47, 58, 14, 99, 56, 62, 31, 39, 20, 45, 35, 16, 93, 127, 24, 60, 106, 28, 75, 143, 50, 64, 71, 79, 41, 95, 22, 68, 129, 18, 164, 148, 120, 112, 141, 26, 110, 108, 30, 89, 77, 38, 91, 52

Offset: 0

Author

Reinhard Zumkeller, Aug 14 2010

Keywords

• nonn

Comments

A180079(n) = a(a(n));

a(A180078(n)) = A180078(a(n)) = A180076(n).

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
• Index entries for sequences that are permutations of the natural numbers

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a180077 = fromJust . (`elemIndex` a180076_list)
-- Reinhard Zumkeller, Mar 13 2014