A248043 Inverse permutation to A248024.
1, 3, 6, 13, 11, 16, 9, 27, 32, 2, 4, 5, 7, 8, 10, 12, 14, 15, 17, 19, 20, 22, 23, 26, 28, 30, 31, 36, 37, 21, 33, 39, 45, 46, 50, 53, 54, 56, 61, 40, 41, 52, 58, 65, 66, 69, 74, 80, 81, 29, 49, 51, 63, 67, 72, 73, 78, 88, 94, 68, 90, 99, 102, 113, 122, 130
Offset: 1
Keywords
Links
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a248043 = (+ 1) . fromJust . (`elemIndex` a248024_list)