A227118 Inverse permutation to A184992.

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

Offset: 1

Author

Reinhard Zumkeller, Jul 01 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)
a227118 = (+ 1) . fromJust . (`elemIndex` a184992_list)