A094512 Inverse of A094511.
2, 1, 5, 3, 6, 7, 11, 4, 10, 9, 13, 14, 15, 19, 23, 8, 12, 17, 21, 18, 22, 25, 27, 20, 26, 28, 29, 30, 31, 39, 47, 16, 24, 33, 37, 34, 35, 41, 43, 36, 38, 44, 45, 42, 46, 51, 55, 40, 50, 49, 53, 54, 57, 58, 59, 52, 60, 61, 62, 63, 79, 87, 95, 32, 48, 56, 69, 65, 67, 71, 75, 66
Offset: 1
Keywords
Links
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a094512 = (+ 1) . fromJust . (`elemIndex` a094511_list) -- Reinhard Zumkeller, Nov 23 2014
Comments