A255479 Inverse permutation to A255582.
1, 2, 3, 4, 10, 5, 13, 6, 7, 8, 21, 9, 24, 11, 12, 16, 31, 14, 38, 18, 15, 23, 43, 20, 30, 22, 17, 25, 51, 28, 59, 27, 19, 29, 32, 37, 67, 36, 26, 34, 78, 35, 81, 39, 42, 41, 90, 44, 52, 46, 33, 48, 101, 47, 58, 50, 40, 49, 108, 55, 119, 57, 54, 64, 60, 63, 131, 66, 45, 62, 136, 68
Offset: 1
Keywords
Links
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a255479 = (+ 1) . fromJust. (`elemIndex` a255582_list) -- Reinhard Zumkeller, Mar 10 2015
Comments