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 A292884 #7 Sep 16 2018 21:42:49
%S A292884 1,3,8,25,76,248,806,2714,9205,31846,111185,393224
%N A292884 Number of ways to shuffle together a multiset of compositions to form a composition of n.
%e A292884 The a(3)=8 shuffles are:
%e A292884 (111)<=((111)), (111)<=((1)(11)), (111)<=((1)(1)(1)),
%e A292884 (12)<=((12)), (12)<=((1)(2)),
%e A292884 (21)<=((21)), (21)<=((1)(2)),
%e A292884 (3)<=((3)).
%t A292884 nn=10;
%t A292884 comps[0]:={{}};comps[n_]:=Join@@Table[Prepend[#,i]&/@comps[n-i],{i,n}];
%t A292884 sps[{}]:={{}};sps[set:{i_,___}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,___}];
%t A292884 dealings[q_]:=Union[Function[ptn,Sort[q[[#]]&/@ptn]]/@sps[Range[Length[q]]]];
%t A292884 Table[Total[Length/@dealings/@comps[n]],{n,nn}]
%Y A292884 Cf. A034691, A059966, A060223, A269134.
%K A292884 nonn,more
%O A292884 1,2
%A A292884 _Gus Wiseman_, Sep 26 2017
%E A292884 a(12) from _Robert Price_, Sep 16 2018