如何删除多余的竖线
发布时间
阅读量:
阅读量
常规情况下用于绘制正切曲线的代码如下:
Plot[Tan[x] - 3 x/(3 + 2967/1000000 x^2), {x, -Pi, 2 Pi}, PlotStyle -> Red, AxesStyle ->{{Arrowheads[.03], Directive[Black, 12]}, {Arrowheads[.03], Directive[Black, 12]}}]
成效:

竖线的存在属于冗余信息,这是Plot功能特性所导致的结果,若需消除该现象,可通过调整Exclusive参数的设定值来实现。
Plot[Tan[x] - 3 x/(3 + 2967/1000000 x^2), {x, -Pi, 2 Pi},
Exclusions -> Cos[x] == 0,
PlotStyle -> Red,AxesStyle -> {{Arrowheads[.03], Directive[Black,12]}, {Arrowheads[.03], Directive[Black, 12
全部评论 (0)
还没有任何评论哟~
