login
A238718
Inverse permutation to A238704.
2
1, 12, 2, 13, 3, 14, 4, 15, 5, 16, 6, 18, 7, 20, 8, 22, 9, 24, 10, 31, 11, 32, 17, 33, 19, 34, 21, 35, 23, 36, 25, 38, 26, 40, 27, 42, 28, 44, 29, 51, 30, 52, 37, 53, 39, 54, 41, 55, 43, 56, 45, 58, 46, 60, 47, 62, 48, 64, 49, 71, 50, 72, 57, 73, 59, 74, 61
OFFSET
1,2
PROG
(Haskell)
import Data.List (elemIndex); import Data.Maybe (fromJust)
a238718 = (+ 1) . fromJust . (`elemIndex` a238704_list)
CROSSREFS
Sequence in context: A264970 A287205 A183729 * A303782 A375462 A335043
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Mar 03 2014
STATUS
approved