%I #16 Dec 18 2019 22:00:43
%S 0,7,12,29,59,72,85,142,190,205,238,270,305,318,402,492,619,652,795,
%T 845,950,996,1121,1163,1228,1393,1548,1662,1756,1920,1937,2106,2202,
%U 2351,2448,2555,2594,2707,2788,3254,3420,3466,3663,3974,4136,4282,4363,4621,4732
%N The n-th index m such that A330439(m) = n.
%H Alois P. Heinz, <a href="/A330589/b330589.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = A330587(n,n).
%p b:= proc() 0 end:
%p g:= proc(n) option remember; local t;
%p t:= `if`(n<2, n, b(g(n-1))+b(g(n-2)));
%p b(t):= b(t)+1; t
%p end:
%p f:= proc(n) option remember; b(g(n)) end:
%p a:= proc() local a, b, t; a, b, t:= proc() end, proc() 0 end, -1;
%p proc(k) local h;
%p while b(k)<k do t:= t+1; h:= f(t);
%p b(h):= b(h)+1; if b(h)=h then a(h):= t fi
%p od: a(k)
%p end
%p end():
%p seq(a(n), n=1..50);
%Y Main diagonal of A330587.
%Y Cf. A316774, A330439.
%K nonn
%O 1,2
%A _Alois P. Heinz_, Dec 18 2019