Mathematicaには，表現をTeX形式に変換するTeXFormがあります。たとえば，TeXForm[Integrate[f[x], x]]とすると「\int f(x) \, dx」を返してくれます。便利です。

しかし，バグがあります。（Mathematica 10.1, 10.2, 10.3, 10.4.1, 11.2, 11.3）

TeXForm[Abs[r + 1/2]]の結果が「\left\left| r+\frac{1}{2}\right\right|」になりますが，これはTeXで処理できません。正しくは「\left| r+\frac{1}{2}\right|」です。TeXForm[Abs[r]]なら「\left| r\right|」という正しい結果が返ります。

開発元には報告済みですが，今のところ手で直すしかありません。計算結果から自動的に論文を書かせるようなどと思うと困ったことになるでしょう。