A257465 Inverse permutation to A175498.
1, 2, 4, 3, 7, 5, 9, 13, 11, 6, 8, 10, 17, 21, 15, 12, 14, 19, 23, 25, 27, 31, 16, 18, 29, 22, 35, 20, 37, 33, 39, 24, 43, 26, 47, 28, 41, 49, 32, 45, 30, 51, 53, 55, 57, 36, 61, 34, 38, 64, 59, 40, 66, 68, 72, 44, 70, 76, 42, 48, 74, 78, 80, 46, 50, 84, 82
Offset: 1
Keywords
Links
Crossrefs
Cf. A175498.
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a257465 = (+ 1) . fromJust . (`elemIndex` a175498_list)