數學情節

Question

所以我想淘汰最後這個問題的一條直線，而我跟隨我的老師的指導，但我的圖似乎依然關閉，但問題是：

使用findroot命令在Mathematica中定義一個具有限制‑pi/2 < x < pi/2的反函數g(y) to y = f(x) = 3x + tan(x)。使用x = tan-1(y)作爲起始值。然後使用繪圖命令來繪製g（y）的圖形。

這是我寫出來：

g[y_] := x /. FindRoot[3 x + Tan[x] == y, {x, ArcTan[y]}] 

Plot[g[y], {y, (-Pi/2), (Pi/2)}] 

我不知道到底是什麼問題，但它顯示了圖作爲剛剛被通過原點的直線。我不確定這是應該如何（我認爲這不是），但任何和所有的幫助將不勝感激！

Answer 1

有你的公式，

3 x + Tan[x] == y 

您可以通過繪製Y（X）來檢查G（γ）的情節的正確性：

Plot[3 x + Tan[x], {x, -.4, .4}] 

正如你可以很容易地看到，這是通過原點的直線。 G（γ）爲y（x）的定義的倒數，所以你可以通過交換通過Y GET克（y）的情節也和x軸：

Plot[3 x + Tan[x], {x, -.4, .4}, 
    PlotRange -> All] /. {x_Real, y_Real} :> {y, x}