如何在mathematica中根据一个元素找出所有包含该元素的集合