[go: up one dir, main page]

login
A238862
Inverse permutation to A239965.
3
1, 2, 3, 4, 6, 7, 5, 9, 11, 8, 10, 12, 14, 15, 13, 18, 20, 16, 24, 19, 17, 21, 23, 25, 22, 27, 29, 26, 28, 30, 32, 33, 31, 35, 37, 38, 36, 41, 43, 39, 47, 51, 34, 40, 42, 44, 46, 48, 45, 50, 52, 49, 53, 55, 57, 54, 58, 60, 61, 56, 65, 63, 66, 59, 64, 69, 72
OFFSET
1,2
COMMENTS
a(A239965(n)) = A239965(a(n)) = n;
A018252(a(n)) = A240024(n).
PROG
(Haskell)
import Data.List (elemIndex); import Data.Maybe (fromJust)
a238862 = (+ 1) . fromJust . (`elemIndex` a239965_list)
CROSSREFS
Cf. A239943 (fixed points).
Sequence in context: A361647 A354901 A026236 * A048201 A186004 A056534
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Apr 30 2014
STATUS
approved