[英]Plots with in-texts (with specificed positions) in Mathematica
I have a plot where I plot different equations in each chunk of the graph. 我有一个图,其中在图的每个块中绘制了不同的方程式。 Using text, I want to write a small notation for each piece of the equation. 使用文本,我想为方程的每一部分写一个小的符号。 The Text
function does not yield the result. Text
功能不会产生结果。 Also is there a way to specify the coordinates of the text? 还有一种方法可以指定文本的坐标? For example, I want the text reading Eqn 1
(see below) to be placed at (0, 0.5) 例如,我希望将阅读Eqn 1
(请参见下文)的文本放在(0,0.5)
Here is my code: 这是我的代码:
Pars = {ep -> 0.5, f1p -> 0.3, f2p -> 0.1, dp -> 0.05, q -> 0.1,
en -> 0.4, d -> 0.1, Q -> 0.1, f2n -> 0.3, f1n -> 0.4, a -> 0.05,
N1 -> 0.5, N2 -> 0.5}; #Parameters
PlotREq1 =
Plot[R = S /. Pars, {S, 0, 0.9375},
PlotRange -> {{0, 3.5}, {0, 2}}, PlotStyle -> {Red, Thick, Dashed},Text[Eqn1]];
PlotREq2 =
Plot[R = (a + d)/(en f1n) /. Pars, {S, 0.9375, 1.4375},
PlotRange -> {{0, 3.5}, {0, 2}}, PlotStyle -> {Green, Thick, Dashed}, Text[Eqn2]];
PlotREq3 =
Plot[R = ((a + d) (f1p - f2p))/(en (f1p f2n - f1n f2p)) /. Pars, {S,
1.4375, 2.3}, PlotRange -> {{0, 3.5}, {0, 2}},
PlotStyle -> {Blue, Thick, Dashed}, Text[Eqn3]];
Show[PlotREq1, PlotREq2, PlotREq3]
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.