A225589 Inverse of permutation in A217122.

1, 2, 4, 3, 8, 5, 6, 16, 7, 9, 10, 12, 11, 32, 13, 14, 17, 15, 18, 20, 19, 24, 21, 22, 64, 23, 25, 26, 28, 27, 33, 29, 30, 34, 31, 36, 35, 40, 37, 38, 48, 39, 41, 42, 44, 43, 128, 45, 46, 49, 47, 50, 52, 51, 56, 53, 54, 65, 55, 57, 58, 60, 59, 66, 61, 62, 68

Offset: 1

Author

Reinhard Zumkeller, May 11 2013

Keywords

• nonn

Links

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

Programs

Haskell

import Data.List (elemIndex)
import Data.Maybe (fromJust)
a225589 = (+ 1) . fromJust . (`elemIndex` a217122_list)