A064275 Inverse of sequence A032447 considered as a permutation of the positive integers.
1, 2, 3, 4, 6, 5, 10, 7, 11, 8, 19, 9, 21, 12, 14, 15, 27, 13, 33, 16, 22, 20, 42, 17, 37, 23, 34, 24, 54, 18, 56, 28, 38, 29, 44, 25, 65, 35, 45, 30, 73, 26, 82, 39, 46, 43, 89, 31, 83, 40, 58, 47, 102, 36, 74, 48, 66, 55, 109, 32, 111, 57, 67, 59, 91, 41, 128, 60, 86, 49, 130, 50, 132, 68, 75, 69, 112, 51, 149, 61
Offset: 1
Links
Programs
-
Haskell
import Data.List (elemIndex); import Data.Maybe (fromJust) a064275 = (+ 1) . fromJust . (`elemIndex` a032447_list) -- Reinhard Zumkeller, Nov 22 2015
Extensions
Edited by N. J. A. Sloane, Nov 05 2007
More terms from Alois P. Heinz, Jan 20 2011