代码之家 › 专栏 › 技术社区 › Yaroslav Bulatov

具有无序子表达式的模式

wolfram-mathematica

Yaroslav Bulatov · 技术社区 · 14 年前

我需要处理像 f[{a,b}]=... 哪里 a 和 b 应该是无秩序的

到目前为止,我使用默认值实现了这个 Sort[] 每次在子表达式上 f 定义或计算。

我的问题是

这和 Orderless ?
有更好的办法吗?

PS:一个示例应用程序是树分解,在树分解中递归地建立数量,如子树[bag1->bag2],其中bag1和bag2是无序顶点集

答案更新

Michael Pilat的答案展示了如何定义一个规则来自动排序f的子表达式。另一种解决方案是定义自定义头 Bag 使用Orderless属性并将该头用于任何Orderless子列表

1 回复 | 直到 14 年前

Community CDub 8 年前

在我回答之后 this question 我咨询了几位同事,他们一致认为以下确实是解决这个问题的最佳/典型方法:

f[{a_, b_}] := 
 f[{Sort[a], Sort[b]}] /; Not[OrderedQ[a]] || Not[OrderedQ[b]]

In[99]:= f[{{1, 2, 3}, {5, 4, 3}}]

Out[99]= f[{{1, 2, 3}, {3, 4, 5}}]

或者,你可以更换内部 List 带有自定义头部符号的头部 Orderless 属性,如果格式化真的很重要,您可以使用最近在这里讨论过的各种格式化技术=)

推荐文章

user23476755 · 在Mathematica中用于串联的符号

1 年前

Canada709 · 如何使用类似Mathematica的NDSolve[](方法LSODA和子方法Newton)的函数在Python中求解边值问题?

1 年前

user4290866 · TradingChart示例不起作用

7 年前

Felipe Jiménez · Mathematica:定义函数控制替换顺序

7 年前

Smile_SafeLY · 如何在列表中振荡数字?

7 年前

Red Eyez · 在没有Wolfram Alpha的情况下,如何求解Mathematica中的绝对值?

7 年前

HEART94 · 如何使用Wolfram Mathematica修改列中的数据?

8 年前

Joseph P Nardone · 具有交互变量的数学图

8 年前

Mike22LFC · 数学问题:符号化求解矩阵方程AX=\lambdaBX

9 年前

NoMan · Mathematica代码中的等效MATLAB代码

10 年前