login
Smallest m such that A225985(m) = A014261(n).
3

%I #4 May 26 2013 15:40:51

%S 1,2,3,4,5,7,9,11,13,15,22,24,26,28,30,37,39,41,43,45,52,54,56,58,60,

%T 67,69,71,73,75,87,89,91,93,95,107,109,111,113,115,127,129,131,133,

%U 135,147,149,151,153,155,167,169,171,173,175,262,264,266,268,270

%N Smallest m such that A225985(m) = A014261(n).

%C A225985(a(n)) = A014261(n).

%H Reinhard Zumkeller, <a href="/A226091/b226091.txt">Table of n, a(n) for n = 1..10000</a>

%o (Haskell)

%o import Data.List (elemIndex)

%o import Data.Maybe (fromJust)

%o a226091 = (+ 1) . fromJust . (`elemIndex` a225985_list) . a014261

%K nonn,base

%O 1,2

%A _Reinhard Zumkeller_, May 26 2013