A096781 a(n) = A075383(A075383(n)).

1, 2, 3, 4, 9, 16, 12, 10, 18, 48, 6, 20, 30, 28, 40, 36, 21, 104, 99, 70, 150, 8, 25, 54, 56, 96, 100, 11, 72, 81, 132, 192, 26, 195, 224, 350, 49, 126, 121, 39, 221, 280, 135, 345, 304, 110, 55, 168, 294, 225, 390, 384, 68, 323, 414, 5, 7, 80, 117, 160, 154, 252

Offset: 1

Author

Reinhard Zumkeller, Jul 09 2004

Keywords

• nonn

Comments

Integer permutation with inverse A096782: a(A096782(n)) = A096782(a(n)) = n;

A096780(a(n)) = a(A096780(n)) = A075383(n).

Links

• Index entries for sequences that are permutations of the natural numbers

Crossrefs

Cf. A075383.

Programs

Haskell

a096781 = a . a where a = (a075383_list !!) . subtract 1
-- Reinhard Zumkeller, Nov 29 2015