Creating sub-list based on a given criterion

*To*: mathgroup at smc.vnet.net*Subject*: [mg110573] Creating sub-list based on a given criterion*From*: Dimitris Emmanoulopoulos <demmanoulopoulos at hotmail.com>*Date*: Sat, 26 Jun 2010 03:10:35 -0400 (EDT)

Hello I was wondering if there is any straightforward way to bin a list into sub-lists containing those elements that full-fill a given criterion. Consider the following list ds= {{{0,0,1},{1,0,-1},{2,0,-1},{3,0,-1},{4,0,-1},{5,588,-1},{6,2345,1},{7,2418,1},{8,2323,1},{9,2179,1}},{{480,23,1},{487,23,1},{470,29,1},{478,32,1},{468,25,1},{498,19,-1},{494,15,1},{496,20,1},{455,33,1},{462,27,1}},{{781,1,1},{779,1,1},{784,0,1},{778,0,1},{766,1,-1},{735,1,-1},{758,1,-1},{733,2,-1},{716,0,-1},{794,1,1}}} The criterion is that the sum of the second elements in each new sub-list should be at least 25? After the re-binning we should get something like: {{0,0,1},{1,0,-1},{2,0,-1},{3,0,-1},{4,0,-1},{5,588,-1}} {6,2345,1} {7,2418,1} {8,2323,1} {9,2179,1} {{480,23,1},{487,23,1}} {470,29,1} {478,32,1} {468,25,1}, {498,19,-1},{494,15,1}, {496,20,1},{455,33,1} {{462,27,1},{781,1,1},{779,1,1},{784,0,1},{778,0,1},{766,1,-1},{735,1,-1},{758,1,-1},{733,2,-1},{716,0,-1},{794,1,1}}} The first bin has a total of the second elements 588, the second 2345, the third 2418,...,the sixth 46, the seventh 29, â?¦,the eleventh 53, and the last one 35. In other words, imagine that these are the results of a counting experiment and the second element in every entry (in ds) corresponds to counts. The question is how can we re-bin the data in order to have at least 25 counts per new-bin? Of course it is straightforward to do it using a Do-loop, but I was wondering if there is any simpler way to do it using the efficient Mathematica syntax in an â??one-liner expressionâ??. Thanks a lot Dimitris