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 A319794 #11 Sep 29 2018 12:57:36 %S A319794 1,1,1,3,3,5,9,11,15,20,31,37,52,64,85,111,141,175,225,279,346,437, %T A319794 532,654,802,979,1182,1438,1740,2083,2502,2996,3565,4245,5043,5950, %U A319794 7068,8303,9772,11449,13452,15681,18355,21338,24855,28846,33509,38687,44819,51644 %N A319794 Number of ways to split a strict integer partition of n into consecutive subsequences with weakly decreasing sums. %e A319794 The a(6) = 9 split partitions: %e A319794 (6) %e A319794 (51) (5)(1) %e A319794 (42) (4)(2) %e A319794 (321) (32)(1) (3)(21) (3)(2)(1). %t A319794 comps[q_]:=Table[Table[Take[q,{Total[Take[c,i-1]]+1,Total[Take[c,i]]}],{i,Length[c]}],{c,Join@@Permutations/@IntegerPartitions[Length[q]]}]; %t A319794 Table[Sum[Length[Select[comps[y],OrderedQ[Total/@#,GreaterEqual]&]],{y,Select[IntegerPartitions[n],UnsameQ@@#&]}],{n,30}] %Y A319794 Cf. A001970, A063834, A316245, A317508, A317546, A317715, A318434, A318683, A318684. %K A319794 nonn %O A319794 0,4 %A A319794 _Gus Wiseman_, Sep 29 2018