Как распечатать уравнения в Mathematica - PullRequest
Новая
       43

Как распечатать уравнения в Mathematica

3 голосов
/ 12 октября 2010

Как определить, что формула не должна вычисляться, а должна отображаться в традиционном формате?Вот 2 примера, где первый отображается так, как я хочу, а второй упрощен. 

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 ]

5 голосов
/ 12 октября 2010

Это немного зависит от того, что именно вы хотите сделать, но если вы просто пишете текст, не используйте 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

... и вы должны получить что-то вроде этого:

You might also find the screencast on typesetting useful: 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 ..."
   }]]
5 голосов
/ 12 октября 2010

Используйте HoldForm для печати выражения без его оценки. 

Print["7. ", HoldForm[Limit[c, x -> a]], "=", c]
(* /*        ^^^^^^^^                      */ *)
0 голосов
/ 12 октября 2010

Если я вас правильно понял - вы не хотите, чтобы Limit [c, x -> a] оценивался. Стандартный способ остановить что-либо от оценки - использовать «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
...