mma格式转TeX格式

由于自己是在使用mathematica建模的，但是建完模型之后要写文章，想到mathematica上的格式是不能直接复制粘贴过去的，无意中看到TeXForm这个函数，发现很好用，于是把用法归纳一下。 可以直接运行下面这个函数：

cg[ss_] := Module[{}, Print["输出样式:" TraditionalForm[HoldForm[ss]]]; Print["代码为:" TeXForm[TraditionalForm[HoldForm[ss]]]]; ]

但是使用的上面这个函数的时候还是要加上HoldForm

cg[ HoldForm[ax+by==z] ]

函数的效果如下图所示：

当然，我们也可以很方便的将TeX格式转换成mathematica认识的格式，使用如下函数即可。

ToExpression["xxxxxxxxxxxxxx", TeXForm]