所以我试图淘汰这个最后一个问题,我正在按照我的老师的指南,但我的图表似乎仍然关闭,问题是:
使用Mathematica中的FindRoot命令定义具有限制g(y) to y = f(x) = 3x + tan(x)
的反函数‑pi/2 < x < pi/2
。使用x = tan-1(y)
作为起始值。然后使用Plot命令制作g(y)图。
这就是我写出来的方式:
g[y_] := x /. FindRoot[3 x + Tan[x] == y, {x, ArcTan[y]}]
Plot[g[y], {y, (-Pi/2), (Pi/2)}]
我不确定问题究竟是什么,但它将图表显示为只是原点的直线。我不确定这是不是应该如何(我认为不是这样),但是任何和所有的帮助都会非常感激!
答案 0 :(得分:1)
有你的等式,
3 x + Tan[x] == y
您可以通过绘制y(x):
来检查g(y)图的正确性Plot[3 x + Tan[x], {x, -.4, .4}]
您可以很容易地看到,它是原点的直线。根据定义,g(y)是y(x)的倒数,因此只需通过交换y轴和x轴就可以得到g(y)的图:
Plot[3 x + Tan[x], {x, -.4, .4},
PlotRange -> All] /. {x_Real, y_Real} :> {y, x}