A238862 Inverse permutation to A239965.

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).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Index entries for sequences that are permutations of the natural numbers

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

Adjacent sequences: A238859 A238860 A238861 * A238863 A238864 A238865

Keyword

nonn

Author

Reinhard Zumkeller, Apr 30 2014

Status

approved