Subsets[ConstantArray["女",2]~Join~ConstantArray["男",4],{3}]~Select~(MemberQ[#,"女"]&)
代码翻译:2女4男选出三个人再选出包含女的组合
纯娱乐代码(