Wolfram mathematica 在绘图中插入公式

在

绘图中插入公式的标准方法是什么

我的情节如下。我想把绘图的公式很好地格式化并插入绘图中
TraditionalForm
看起来不错，但它将公式放在一行中，而我想要一个两行分数

Plot[{1, (\[CapitalDelta] - 1)^(\[CapitalDelta] - 
   1)/(\[CapitalDelta] - 2)^\[CapitalDelta]}, {\[CapitalDelta], 3, 6},
  PlotRange -> {0, 4}, PlotStyle -> {Dashing[.02], Thick}, 
 AxesLabel -> {"\[CapitalDelta]", "\[Lambda]"}]

也许这能让你开始

Plot[{1,(\[CapitalDelta]-1)^(\[CapitalDelta]-1)/(\[CapitalDelta]-2)^\[CapitalDelta]}, 
{\[CapitalDelta],3,6},PlotRange->{0,4},
PlotStyle->{Dashing[.02],Thick},AxesLabel->{"\[CapitalDelta]","\[Lambda]"},
Epilog->Inset[Style[
   HoldForm@@MakeExpression@MakeBoxes@TraditionalForm[(\[CapitalDelta]-1)^
   (\[CapitalDelta]-1)/(\[CapitalDelta]-2)^\[CapitalDelta]],10]]]

对不起，我迟到了：D。我主要用的是莱昂尼德答案的简化版本。不确定它是否适用于任何用途，但在这里肯定有效

Plot[{1, (\[CapitalDelta] - 1)^(\[CapitalDelta] - 
      1)/(\[CapitalDelta] - 2)^\[CapitalDelta]}, {\[CapitalDelta], 3, 
  6}, PlotRange -> {0, 4}, PlotStyle -> {Dashing[.02], Thick}, 
 AxesLabel -> {"\[CapitalDelta]", "\[Lambda]"}, 

Epilog->Inset[HoldForm@TraditionalForm[


或者使用Epilog->Inset[Panel@HoldForm@传统形式…功能周围的漂亮方框：

谢谢，看起来像是
HoldForm@@MakeExpression@MakeBoxes@TraditionalForm
是我将公式格式化为fraction@Yaroslav：可能还有一种更优雅的方法-这只是我很快尝试过的第一件有效的方法。您也可以用JU替换
HoldForm@@MakeExpression@
t
DisplayForm@
   (\[CapitalDelta] - 1)^(\[CapitalDelta] - 1)/
   (\[CapitalDelta] - 2)^\[CapitalDelta]]]]