This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A349316 #27 Jun 22 2023 17:10:46 %S A349316 0,10,100,120,1010,1020,1120,1230,10120,10130,10230,10240,11230,11240, %T A349316 12240,12350,101130,101240,101350,102240,102350,102460,112240,112350, %U A349316 112460,122360,122470,123470,123580,1011240,1011250,1011350,1011360,1012250,1012360,1012460 %N A349316 Where records occur in A348674. %H A349316 Alois P. Heinz, <a href="/A349316/b349316.txt">Table of n, a(n) for n = 1..105</a> %F A349316 A349315(a(n)) = 1. %F A349316 A348674(a(n)) < A348674(a(n+1)). %p A349316 b:= proc(s) option remember; (n-> {parse(s), seq(seq(seq(x+y, %p A349316 y=b(s[i+1..n])), x=b(s[1..i])), i=1..n-1)})(length(s)) %p A349316 end: %p A349316 a:= proc(n) option remember; local k, t; t:=nops(b(""||(a(n-1)))); %p A349316 for k from 1+a(n-1) while nops(b(""||k))<=t do od; k %p A349316 end: a(1):=0: %p A349316 seq(a(n), n=1..29); %Y A349316 Cf. A348674, A349315. %K A349316 nonn,base %O A349316 1,2 %A A349316 _Alois P. Heinz_, Nov 14 2021