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 A279791 #6 Dec 21 2016 11:05:53
%S A279791 1,1,2,2,3,6,5,8,8,16,12,23,18,36,33,50,38,84,54,106,100,155,104,244,
%T A279791 142,301,270,436,256,684,340,788,670,1044,585,1868,760,1878,1600,2647
%N A279791 Number of twice-partitions of type (Q,R,Q) and weight n.
%H A279791 Gus Wiseman, <a href="/A063834/a063834.txt">Sequences enumerating triangles of integer partitions</a>
%e A279791 The a(8)=8 twice-partitions of type (Q,R,Q) are:
%e A279791 ((8)), ((71)), ((62)), ((53)),
%e A279791 ((521)), ((4)(31)), ((31)(4)), ((431)).
%t A279791 nn=20;
%t A279791 sps[{}]:={{}};sps[set:{i_,___}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,___}];
%t A279791 Table[Total[Total[Factorial/@Length/@Select[sps[Sort[#]],SameQ@@Total/@#&]]&/@Select[IntegerPartitions[n],UnsameQ@@#&]],{n,nn}]
%Y A279791 Cf. A063834, A275972, A279790.
%K A279791 nonn,look
%O A279791 1,3
%A A279791 _Gus Wiseman_, Dec 18 2016