login
Smallest number m such that A229037(m) = n.
7

%I #4 Apr 28 2014 02:21:06

%S 1,3,95,8,22,121,144,24,27,60,67,73,66,79,163,196,148,150,220,80,181,

%T 173,178,197,213,203,194,202,261,374,304,387,645,295,447,379,290,420,

%U 362,506,515,878,520,836,941,495,594,754,884,958,501,485,561,407,467

%N Smallest number m such that A229037(m) = n.

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

%H Reinhard Zumkeller, <a href="/A241752/b241752.txt">Table of n, a(n) for n = 1..1000</a>

%o (Haskell)

%o import Data.List (elemIndex); import Data.Maybe (fromJust)

%o a241752 = (+ 1) . fromJust . (`elemIndex` a229037_list)

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Apr 28 2014