|
%I #9 May 07 2016 00:24:48
%S 13,1,27,23,891,4795,125201,3253303
%N Least k for which A065413(k) = n, or 0 if no such k exists.
%e a(3) = 23 because the first occurrence of 3 in A065413 is A065413(23) = 3.
%p # given vector A of size N constructed as in A065413
%p M:= max(A):
%p B:= Array(0..M):
%p for i from 1 to N do
%p if B[A[i]] = 0 then B[A[i]]:= i fi
%p od:
%p convert(B,list); # _Robert Israel_, May 06 2016
%Y Cf. A065413.
%K nonn,more,base
%O 0,1
%A _Robert Israel_, May 06 2016
|
