新人求助,logplot画多个函数图时有一个画不全
mathematica吧
全部回复
仅看楼主
level 2
r如图,第三个函数即蓝色线,在右下角处应和虚线段重合,但却忽然中断了
2022年11月23日 12点11分 1
level 2
t太糊了,重传一下
2022年11月23日 13点11分 2
吧务
level 10
贴代码
2022年11月23日 13点11分 3
大佬我贴了,麻烦您看一下
2022年11月24日 00点11分
level 2
LogPlot[{(3 mp2*h1^2*(x*10^-10)^(2 n))/(
8 \[Pi]) (1 - ((-2 n)/(3 h1*(x*10^-10)^(n + 1)))^((2 a)/(
2 a - 1)))^((2 a - 1)/(
2 a)) /. {mp2 -> (1.2205107208996787`*^16)^2,
h1 -> 0.
13790843364
241426`, n -> -1.161623571330226`, a -> 2}, (
3 mp2*h1^2*(x*10^-10)^(2 n))/(
8 \[Pi]) (1 - ((-2 n)/(3 h1*(x*10^-10)^(n + 1)))^((2 a)/(
2 a - 1)))^((2 a - 1)/(
2 a)) /. {mp2 -> (1.2205107208996787`*^16)^2,
h1 -> 0.326957574160892`, n -> -1.1242042362613676`, a -> 3}, (
3 mp2*h1^2*(x*10^-10)^(2 n))/(
8 \[Pi]) (1 - ((-2 n)/(3 h1*(x*10^-10)^(n + 1)))^((2 a)/(
2 a - 1)))^((2 a - 1)/(
2 a)) /. {mp2 -> (1.2205107208996787`*^16)^2,
h1 -> 1.478524118426538`*^-15, n -> -2.580645161290316`,
a -> 1}}, {x, 0, 1},
PlotStyle -> {Dashing[1], Dashing[Large], Dashing[Tiny]},
Frame -> True, FrameStyle -> Directive[Black],
PlotLegends ->
Placed[LineLegend[{"\[Alpha]=2", "\[Alpha]=3", "\[Alpha]=1"},
LegendFunction -> (Panel[#, ImageSize -> {70, 58}] &),
LegendMargins -> 0], {Scaled[{0.75, 0.9}], {0, 0.8}}],
FrameLabel -> {\[Phi], V[\[Phi]]}]
2022年11月24日 00点11分 4
吧务
level 10
Dashing[1] 改为 Dashing[{}]
2022年11月24日 05点11分 6
成功了,感谢大佬
2022年11月24日 07点11分
1