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
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..105
Programs
-
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);