A241752 Smallest number m such that A229037(m) = n.

1, 3, 95, 8, 22, 121, 144, 24, 27, 60, 67, 73, 66, 79, 163, 196, 148, 150, 220, 80, 181, 173, 178, 197, 213, 203, 194, 202, 261, 374, 304, 387, 645, 295, 447, 379, 290, 420, 362, 506, 515, 878, 520, 836, 941, 495, 594, 754, 884, 958, 501, 485, 561, 407, 467

Offset: 1

Author

Reinhard Zumkeller, Apr 28 2014

Keywords

• nonn

Comments

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

Links

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

Programs

Haskell

import Data.List (elemIndex); import Data.Maybe (fromJust)
a241752 = (+ 1) . fromJust . (`elemIndex` a229037_list)