[go: up one dir, main page]

login
A241752
Smallest number m such that A229037(m) = n.
7
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,2
COMMENTS
A229037(a(n)) = n and A229037(m) <> n for m < a(n).
LINKS
PROG
(Haskell)
import Data.List (elemIndex); import Data.Maybe (fromJust)
a241752 = (+ 1) . fromJust . (`elemIndex` a229037_list)
CROSSREFS
Sequence in context: A037113 A142887 A297489 * A093009 A373551 A273442
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Apr 28 2014
STATUS
approved