mathematica7 plot 无法绘图

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}]我运行的结果见图

= 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}]
首写字母大写

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息