A252448 Inverse permutation to A249990.
2, 1, 4, 5, 7, 3, 9, 8, 11, 12, 18, 6, 13, 14, 16, 10, 20, 17, 24, 25, 31, 15, 26, 19, 22, 23, 33, 32, 39, 27, 29, 21, 35, 34, 37, 40, 50, 30, 41, 42, 48, 38, 52, 49, 60, 61, 71, 28, 43, 44, 46, 36, 54, 47, 62, 63, 69, 45, 64, 51, 58, 59, 73, 72, 83, 53, 56
Offset: 1
Keywords
Links
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a252448 = (+ 1) . fromJust . (`elemIndex` a249990_list)