如何在Mathematica中打印出方程式

如何定义不应计算公式，而是以传统格式显示？这里有两个例子，第一个显示就像我想要的那样，但第二个是简化的。

Print["5. ", Limit[f[x]/g[x], x -> a], "=", Limit[f[x], x -> a]/Limit[g[x], x -> a], ", where ", Limit[g[x], x -> a] != 0];
Print["7. ", Limit[c, x -> a], "=", c]

已邀请:

3 个回复

徘廷

使用HoldForm打印表达式而不进行评估。

Print["7. ", HoldForm[Limit[c, x -> a]], "=", c]
(* /*        ^^^^^^^^                      */ *)

田眯衅

这取决于你想要做什么，但如果你只是写文字，不要使用Print。而是直接输入文本，确保使用的是Text单元而不是Input单元。在菜单中，选择：

Format -> Style -> Text

然后输入你想要的内容，例如：

5. Limit[f[x]/g[x], x -> a] == Limit[f[x], x->a]/Limit[g[x], x -> a] where ...

选择要转换为TraditionalForm的表达式，然后再次在菜单中选择：

Cell -> ConvertTo -> TraditionalForm

......你应该得到这样的东西：您可能还会发现排版的截屏视频非常有用： http://www.wolfram.com/broadcast/screencasts/howtoentermathematicaltypesetting/ 如果您实际上尝试以编程方式生成TraditionalForm输出（例如，使用Print），您可以考虑使用Row和TraditionalForm与HoldForm：

Print[Row[{
   "5. ",
    TraditionalForm[HoldForm[
     Limit[f[x]/g[x], x -> a] == Limit[f[x], x -> a]/Limit[g[x], x -> a]]],
   " where ..."
   }]]

为陡土

如果我没有正确理解你 - 你不希望评估Limit [c，x - > a]。 Standart停止评估的方法是使用“Hold”。

  Print["7. ", Hold[Limit[c, x -> a]], "=", c]

但结果并不好：

  7. Hold[Limit[c, x -> a]] = c

HoldForm命令可以解决问题 - 它保持评估但不显示：

  Print["7. ", HoldForm[Limit[c, x -> a]], "=", c]
  7. Limit[c, x -> a] = c

要回复问题请先登录或注册

如何在Mathematica中打印出方程式

3 个回复

发起人

typesetting

mathematical_typesetting

问题状态

如何在Mathematica中打印出方程式

与内容相关的链接

3 个回复

发起人

typesetting

mathematical_typesetting

问题状态