现在是我的图生成出来了,然后我想要把最大值的坐标给他生成出来
mathematica吧
全部回复
仅看楼主
level 2
lemon2021ZX 楼主
现在是我的图生成出来了,然后我想要把最大值的坐标给他生成出来,生成成数据那样的形式,我现在只是我鼠标放在图中,它有这个坐标的位置。想问一下添加什么命令可以使得坐标生成出来。以下是我的代码:Manipulate[
Plot[{Cos[2 Pi (\[Nu]*t - x/\[Lambda]1) + 1],
Cos[2 Pi (\[Nu]*t + x/\[Lambda]2)],
Cos[2 Pi (\[Nu]*t - x/\[Lambda]1) + 1] +
Cos[2 Pi (\[Nu]*t + x/\[Lambda]2)]}, {x, 0, 5},
PlotLegends -> "Expressions"], {t, 0, 10}, {\[Nu], 1,
10}, {\[Lambda]1, 1, 10}, {\[Lambda]2, 1, 10}]
2024年05月25日 05点05分 1
level 9
Manipulate[
list = {Cos[2 Pi (\[Nu]*t - x/\[Lambda]1) + 1],
Cos[2 Pi (\[Nu]*t + x/\[Lambda]2)],
Cos[2 Pi (\[Nu]*t - x/\[Lambda]1) + 1] +
Cos[2 Pi (\[Nu]*t + x/\[Lambda]2)]};
max = Max@Map[MaxValue[{#, x > 0, x < 5}, x] &, list];
min = Min@Map[MinValue[{#, x > 0, x < 5}, x] &, list];
Plot[list, {x, 0, 5}, PlotLegends -> "Expressions",
PlotRange -> Full, Ticks -> { Automatic, {min, max}}], {{t, 0.}, 0,
10}, {{\[Nu], 1.}, 1, 10}, {{\[Lambda]1, 1.}, 1,
10}, {{\[Lambda]2, 1.}, 1, 10}]
2024年05月25日 17点05分 2
1