代码如下:
Plot[{(3600.` 2.5`[250 - 4 (10 + e)])/(
1800 - 22.5` (1 + e)^2 (5 + 3 e) -
0.75` 4[-e^2 + (2.5` + e)^2][4800 - 9.` (1 + e)^2])}, {e, 0, 7},
PlotLegends -> "Expressions", AxesLabel -> {"e", "p1"},
LabelStyle ->
Directive[15, FontFamily -> "Times New Roman", FontColor -> Black],
ImageSize -> {300}]