A330589 The n-th index m such that A330439(m) = n.

0, 7, 12, 29, 59, 72, 85, 142, 190, 205, 238, 270, 305, 318, 402, 492, 619, 652, 795, 845, 950, 996, 1121, 1163, 1228, 1393, 1548, 1662, 1756, 1920, 1937, 2106, 2202, 2351, 2448, 2555, 2594, 2707, 2788, 3254, 3420, 3466, 3663, 3974, 4136, 4282, 4363, 4621, 4732

Offset

1,2

Links

Alois P. Heinz, Table of n, a(n) for n = 1..10000

Formula

a(n) = A330587(n,n).

Maple

b:= proc() 0 end:
g:= proc(n) option remember; local t;
      t:= `if`(n<2, n, b(g(n-1))+b(g(n-2)));
      b(t):= b(t)+1; t
    end:
f:= proc(n) option remember; b(g(n)) end:
a:= proc() local a, b, t; a, b, t:= proc() end, proc() 0 end, -1;
      proc(k) local h;
        while b(k)<k do t:= t+1; h:= f(t);
          b(h):= b(h)+1; if b(h)=h then a(h):= t fi
        od: a(k)
      end
    end():
seq(a(n), n=1..50);

Crossrefs

Main diagonal of A330587.

Cf. A316774, A330439.

Sequence in context: A224699 A078575 A220036 * A197229 A316088 A198306

Adjacent sequences: A330586 A330587 A330588 * A330590 A330591 A330592

Keyword

nonn

Author

Alois P. Heinz, Dec 18 2019

Status

approved