1,1

The permutation is self-inverse: a(a(n)) = n;

by definition there are no fixed points.

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

Index entries for sequences that are permutations of the natural numbers

(Haskell)

import Data.List (delete)

a260822 n = a260822_list !! (n-1)

a260822_list = f 1 [1..] where

f x zs = g zs where

g (y:ys) = if y /= x && a010051' (x + y) == 0

then y : f (x + 1) (delete y zs) else g ys

Cf. A010051, A002808, A260933.

Sequence in context: A343613 A333454 A021971 * A256008 A171073 A021297

Adjacent sequences: A260819 A260820 A260821 * A260823 A260824 A260825

nonn

Reinhard Zumkeller, Aug 04 2015

approved