500*_*500 3 select design-patterns wolfram-mathematica case
请考虑 :
Subsets[Flatten[ParallelTable[{i, j}, {i, 1, 96}, {j, 1, 4}], 1], {4}]
Run Code Online (Sandbox Code Playgroud)
我需要选择所有子列表,使得i值在4的每个子列表中永远不会相同
{{1,1},{1,2},{2,3},{ ,1}}应该被拒绝.我重复2次的值1.
我知道我可以用案例来做这件事,但是不理解它的语法,并且发现与其潜在应用相比,案件的帮助相当空洞.
假设您的数据在变量中data,则应执行以下操作:
Select[data, Length@Union[#[[All, 1]]] === 4 &]
Run Code Online (Sandbox Code Playgroud)
这需要" i" - 值(即第一个元素),并检查4个值是否都不同(即如果我们删除重复项,我们仍然有4个)
| 归档时间: |
|
| 查看次数: |
150 次 |
| 最近记录: |