A247879 Inverse permutation to A248025.

1, 4, 7, 10, 13, 16, 19, 22, 25, 2, 3, 28, 37, 40, 55, 64, 67, 82, 91, 5, 6, 33, 43, 53, 57, 70, 77, 90, 94, 8, 9, 29, 46, 51, 59, 73, 81, 89, 97, 11, 12, 34, 38, 49, 61, 66, 76, 88, 100, 14, 15, 30, 41, 44, 63, 69, 80, 87, 103, 17, 18, 35, 47, 54, 56, 72

Offset: 1

Author

Reinhard Zumkeller, Sep 30 2014

Keywords

• nonn

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
• Index entries for sequences that are permutations of the natural numbers

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a247879 = (+ 1) . fromJust . (`elemIndex` a248025_list)