A117922 Inverse of A055265, assuming it is a permutation, as conjectured.

1, 2, 3, 4, 7, 6, 5, 8, 9, 10, 17, 16, 11, 14, 13, 12, 15, 18, 19, 22, 21, 20, 23, 24, 29, 32, 31, 28, 25, 26, 27, 36, 33, 30, 35, 40, 41, 34, 37, 38, 43, 42, 39, 48, 47, 54, 51, 44, 45, 50, 55, 46, 49, 52, 53, 56, 57, 64, 69, 72, 59, 62, 67, 66, 61, 60, 71, 68, 63, 58, 73, 70

Offset: 1

Author

Reinhard Zumkeller, Apr 03 2006

Keywords

• nonn

Links

• T. D. Noe, Table of n, a(n) for n = 1..1000
• Index entries for sequences that are permutations of the natural numbers

Crossrefs

A117924(n) = a(a(n)); A117925 lists fixed points.

Programs

Haskell

import Data.List (elemIndex)
import Data.Maybe (fromJust)
a117922 = (+ 1) . fromJust . (`elemIndex` a055265_list)
-- Reinhard Zumkeller, Feb 14 2013

Extensions

Edited by M. F. Hasler, Dec 14 2015