用mupad绘制余弦和正割函数图像
//s接收cos(x)-sec(x)=0时的解
s:=solve(cos(x)-sec(x),x=-2*PI..2*PI);
//p接收图像的交点
p:=[[s[i],cos(s[i])]$i=1..5];
//画图,cosx的图像用虚线显示
plot(plot::Function2d(cos(x),x=-2*PI..2*PI,LineStyle=Dashed),
plot::Function2d(sec(x),x=-2*PI..2*PI),
//图像中显示文字
plot::Text2d("cosx",[PI/2,1/2]),
plot::Text2d("secx",[PI/4,2]),
//描焦点,p作为交点列表
plot::PointList2d(p),
//x,y单位长度相等,视图规格4PI*4
#C,ViewingBox[-2*PI..2*PI,-2..2]);
做函数图像并求零点
//创建函数并化简
y:=Simplify((x^2-3)/(x^2-3*x+2));
//求零点
s:=solve(y,x=-4..4);
p:=[[s[i],0]$i=1..2];
//绘图
plot(plot::Function2d(y,x=-4..4),
plot::PointList2d(p),
#C,ViewingBox[-4..4,-4..4]);