A200087 Smallest number m such that A079878(m) = n.

1, 2, 53, 5, 71, 26, 9, 8, 19, 72, 149, 27, 91, 18, 21, 17, 43, 20, 29, 50, 35, 150, 45, 28, 99, 92, 773, 34, 171, 42, 33, 32, 123, 44, 49, 41, 75227, 58, 137, 51, 295, 48, 789, 68, 47, 46, 65, 57, 891, 100, 269, 90, 111, 428, 921, 64, 131, 172, 105, 203

Offset: 1

Author

Reinhard Zumkeller, Nov 13 2011

Keywords

• nonn

Comments

A079878(a(n)) = n and A079878(m) <> n for m < a(n).

Links

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

Programs

Haskell

import Data.List (elemIndex)
import Data.Maybe (fromJust)
a200087 n = (fromJust $ elemIndex n a079878_list) + 1