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 A338169 #19 Oct 16 2020 02:03:17
%S A338169 1,1,2,2,2,1,1,2,3,1,3,1,3,2,2,1,3,2,3,2,3,1,3,3,1,3,1,2,3,2,3,2,1,1,
%T A338169 2,3,4,1,2,4,1,2,4,3,1,3,2,4,1,3,4,1,3,4,2,1,4,1,4,2,1,4,2,3,1,4,3,1,
%U A338169 4,3,2,2,1,3,4,2,1,4,2,1,4,3,2,3,1,4,2
%N A338169 A list of all finite sequences of distinct positive integers sorted by their maximum value, then lexicographically.
%C A338169 There are A001339(n - 1) sequences with a maximum value of n.
%C A338169 Conjecture: the sum of the sum of all sequences with a maximum value of n is given by A281912(n).
%H A338169 Peter Kagey, <a href="/A338169/b338169.txt">Table of n, a(n) for n = 1..9786</a> (all sequences with maximum <= 6.)
%e A338169 Maximum value 1:
%e A338169 [1],
%e A338169 Maximum value 2:
%e A338169 [1,2],
%e A338169 [2],
%e A338169 [2,1],
%e A338169 Maximum value 3:
%e A338169 [1,2,3],
%e A338169 [1,3],
%e A338169 [1,3,2],
%e A338169 [2,1,3],
%e A338169 [2,3],
%e A338169 [2,3,1],
%e A338169 [3],
%e A338169 [3,1],
%e A338169 [3,1,2],
%e A338169 [3,2],
%e A338169 [3,2,1]
%t A338169 Table[Map[ToExpression /@ StringPartition[#, 1, 1] &, Sort[Map[StringJoin, Join @@ Map[Permutations, DeleteCases[Rest@ Subsets[ToString /@ Range@ k], _?(FreeQ[#, ToString@ k] &)]]]]], {k, 4}] // Flatten (* _Michael De Vlieger_, Oct 15 2020 *)
%Y A338169 Cf. A001339, A026791, A228369, A281912.
%K A338169 nonn,tabf
%O A338169 1,3
%A A338169 _Peter Kagey_, Oct 14 2020