A249571 Inverse permutation to A249054.
1, 2, 4, 3, 7, 5, 11, 6, 8, 9, 12, 10, 14, 13, 15, 16, 17, 20, 18, 21, 24, 25, 19, 26, 28, 29, 31, 33, 22, 35, 23, 36, 39, 40, 43, 44, 27, 46, 48, 49, 30, 52, 32, 56, 57, 59, 34, 60, 62, 63, 66, 67, 37, 69, 70, 73, 76, 77, 38, 79, 41, 82, 83, 85, 86, 88, 42
Offset: 1
Keywords
Links
Crossrefs
Cf. A249054.
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a249571 = (+ 1) . fromJust . (`elemIndex` a249054_list)