[go: up one dir, main page]

login
A370290
Row sums of A370220.
3
1, 4, 3, 9, 8, 8, 7, 6, 16, 15, 15, 14, 13, 15, 14, 14, 13, 12, 13, 12, 11, 10, 25, 24, 24, 23, 22, 24, 23, 23, 22, 21, 22, 21, 20, 19, 24, 23, 23, 22, 21, 23, 22, 22, 21, 20, 21, 20, 19, 18, 22, 21, 21, 20, 19, 20, 19, 18, 17, 19, 18, 17, 16, 15, 36, 35, 35, 34
OFFSET
1,2
COMMENTS
See A370220 for more information.
MATHEMATICA
zsums[m_] := With[{r = 2*Range[2, m]}, Reverse[Map[Total[#]+1 &, Select[Subsets[Range[2, 2*m-1], {m-1}], Min[r-#] > 0 &]]]];
Flatten[Array[zsums, 6]]
CROSSREFS
Cf. A370220.
Sequence in context: A094728 A212001 A365904 * A275473 A131805 A197694
KEYWORD
nonn
AUTHOR
Paolo Xausa, Feb 14 2024
STATUS
approved