OFFSET
1,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..105
MAPLE
b:= proc(s) option remember; (n-> {parse(s), seq(seq(seq(x+y,
y=b(s[i+1..n])), x=b(s[1..i])), i=1..n-1)})(length(s))
end:
a:= proc(n) option remember; local k, t; t:=nops(b(""||(a(n-1))));
for k from 1+a(n-1) while nops(b(""||k))<=t do od; k
end: a(1):=0:
seq(a(n), n=1..29);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Alois P. Heinz, Nov 14 2021
STATUS
approved