本文介绍了使用数值计算解决方程x^3-10=0的方法，包括直接求根和切线迭代法，并通过图形展示了函数f1(x)。
例： x^3-10 = 0,求x
Clear["Global`*"] (* Flatten[ ] *)
f1[x_] := N[x^3 - 10, 10];
f1'[t] // FullSimplify
FindRoot[x^3 == 10, {x, 1}] (* 直接找根的方法 *)
Clear[x, x0]
x0 = 1.0; (* 切线迭代找根的方法 *)
For[time = 1, time <= 10, time++, x0 = x0 - f1[x0]/f1'[x0];
Print[time, " : ", N[x0, 10]];]
va = 3;
show1 = Plot[f1[x], {x, -va, va}]
扫一扫
132
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
