OFFSET
0,1
MAPLE
# given vector A of size N constructed as in A065413
M:= max(A):
B:= Array(0..M):
for i from 1 to N do
if B[A[i]] = 0 then B[A[i]]:= i fi
od:
convert(B, list); # Robert Israel, May 06 2016
CROSSREFS
KEYWORD
nonn,more,base
AUTHOR
Robert Israel, May 06 2016
STATUS
approved