作业帮 > 综合 > 作业

Mathematica 如何把这类相匹配的元素提出来组成表?

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/11/01 07:35:19
Mathematica 如何把这类相匹配的元素提出来组成表?
如何把这类相匹配的元素提出来组成表?
如何把每个子表中与某个数匹配的参数提出来组成表?例如:
输入:s1 = {{x1 -> 1,x2 -> 2,x3 -> 2,x4 -> 1,x5 -> 2},{x1 -> 1,x2 -> 2,x3 -> 1,x4 -> 2,x5 -> 2},{x1 -> 2,x2 -> 2,x3 ->2,x4 -> 1,x5 -> 1},{x1 -> 1,x2 -> 1,x3 -> 0,x4 ->3,x5 -> 1}};
X=1;
输出:s2={{ x1,x4},{x1,x3},{ x4,x5},{x1,x2,x5}};
上例是把所有等于1的参数各自提出来组成的表.
Extract[{x1, x2, x3, x4, x5}, #] & /@ (Position[{x1, x2, x3, x4, x5} /. #, X] & /@ s1)