A349316 Where records occur in A348674.

0, 10, 100, 120, 1010, 1020, 1120, 1230, 10120, 10130, 10230, 10240, 11230, 11240, 12240, 12350, 101130, 101240, 101350, 102240, 102350, 102460, 112240, 112350, 112460, 122360, 122470, 123470, 123580, 1011240, 1011250, 1011350, 1011360, 1012250, 1012360, 1012460

Offset

1,2

Links

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

Formula

A349315(a(n)) = 1.

A348674(a(n)) < A348674(a(n+1)).

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

Cf. A348674, A349315.

Sequence in context: A135652 A035504 A072366 * A119082 A116143 A208497

Adjacent sequences: A349313 A349314 A349315 * A349317 A349318 A349319

Keyword

nonn,base

Author

Alois P. Heinz, Nov 14 2021

Status

approved