A261351 Inverse permutation to A084385.

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

Offset

1,2

Comments

-4 <= a(n) - A084385(n) <= 3;

for n > 4: a(n) != A084385(n);

for n > 7: a(n) >= A084385(n) - 3.

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)
a261351 = (+ 1) . fromJust . (`elemIndex` a084385_list)

Crossrefs

Cf. A084385.

Sequence in context: A296616 A143529 A331010 * A249054 A103867 A075375

Adjacent sequences: A261348 A261349 A261350 * A261352 A261353 A261354

Keyword

nonn

Author

Reinhard Zumkeller, Aug 16 2015

Status

approved