mathematica7 plot 无法绘图程序如下b = 200; L = 12580;plot[x = -ArcSec[(2 (b^3 L + b L^3 - Sqrt[-b^4 L^2 R^2 + 2 b^2 L^4 R^2 - L^6 R^2 + 4 L^4 R^4]))/(b^4 + 2 b^2 L^2 + L^4 - 4 L^2 R^2)],{R,13000,15000}]我运行的结果见图
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/27 06:00:28
mathematica7 plot 无法绘图程序如下b = 200; L = 12580;plot[x = -ArcSec[(2 (b^3 L + b L^3 - Sqrt[-b^4 L^2 R^2 + 2 b^2 L^4 R^2 - L^6 R^2 + 4 L^4 R^4]))/(b^4 + 2 b^2 L^2 + L^4 - 4 L^2 R^2)],{R,13000,15000}]我运行的结果见图
mathematica7 plot 无法绘图
程序如下b = 200; L = 12580;
plot[x = -ArcSec[(
2 (b^3 L + b L^3 -
Sqrt[-b^4 L^2 R^2 + 2 b^2 L^4 R^2 - L^6 R^2 + 4 L^4 R^4]))/(
b^4 + 2 b^2 L^2 + L^4 - 4 L^2 R^2)],{R,13000,15000}]我运行的结果见图
mathematica7 plot 无法绘图程序如下b = 200; L = 12580;plot[x = -ArcSec[(2 (b^3 L + b L^3 - Sqrt[-b^4 L^2 R^2 + 2 b^2 L^4 R^2 - L^6 R^2 + 4 L^4 R^4]))/(b^4 + 2 b^2 L^2 + L^4 - 4 L^2 R^2)],{R,13000,15000}]我运行的结果见图
b = 200; L = 12580;
Plot[x = -ArcSec[(2 (b^3 L + b L^3 -
Sqrt[-b^4 L^2 R^2 + 2 b^2 L^4 R^2 - L^6 R^2 +
4 L^4 R^4]))/(b^4 + 2 b^2 L^2 + L^4 - 4 L^2 R^2)], {R,
13000, 15000}]
首写字母大写