Вставка формулы в сюжет

Question

Какой стандартный способ вставить формулу в Plot?

Мой график ниже.Я хотел бы, чтобы формула графика была красиво отформатирована и вставлена ​​в график.TraditionalForm выглядит нормально, но формула помещается в одну строку, а я хочу дробь из двух строк.

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

Answer 1

Извините за опоздание: D.Я в основном использую упрощенную версию ответа Леонида.Не уверен, что он достаточно общий для каких-либо целей, но, безусловно, работает здесь.

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

Эпилог -> Вставка [HoldForm @ TraditionalForm [

   (\[CapitalDelta] - 1)^(\[CapitalDelta] - 1)/
   (\[CapitalDelta] - 2)^\[CapitalDelta]]]]  

Или используйте Эпилог -> Вставка [Panel @ HoldForm @ TraditionalForm ... для удобного поля вокруг функции:

Answer 2

Возможно, с этого можно начать?

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]]]