在Mathematica中有条件地选择嵌套列表

Question

考虑:

list= {{{{21, 22}, 283}, {{26, 13}, 28}, {{32, 17}, 531}, {{31, 11}, 
187}, {{30, 9}, 154}, {{25, 12}, 377}, {{12, 16}, 
285}}, {{{20, 19}, 183}, {{11, 23}, 249}, {{18, 21}, 
174}, {{12, 21}, 513}, {{24, 23}, 233}, {{29, 20}, 
465}}, {{{18, 20}, 136}, {{13, 23}, 244}, {{19, 21}, 
228}, {{14, 16}, 453}, {{14, 22}, 201}, {{18, 22}, 
417}, {{10, 22}, 217}, {{17, 23}, 180}}, {{{22, 20}, 
123}, {{25, 17}, 210}, {{28, 10}, 536}, {{27, 13}, 
296}, {{19, 11}, 391}, {{23, 18}, 305}, {{24, 18}, 204}}}


Length /@ list

{7, 6, 8, 7}

问题是:

我怎样才能选择长度> 7的子列表.我一直在尝试很多位置/选择失败:-(

Answer 1

Select[list, Length@# > 7 &]  

编辑

如有疑问,您可以测试标准如何评估其参数.例如:

Select[{a, b, c}, Print]

或者在经典路径上多一点:

Reap@Select[{a, b, c}, Sow]

感谢Brett在下面的评论中提出的建议