zzy076_3.m

来自「北京航空航天大学出版社张志涌、徐彦琴主编的matlab教程附带的mfile例程压」· M 代码 · 共 30 行

function Hr=zzy076_3(flag )
% ZZY076_3     为演示函数、子函数句柄而设计的绘图文件。
% Hr=zzy076_3(flag)
% flag         可以取字符串'line'或 'circle'。
% Hr           是其子函数cirline(wd,x,y,t) 的函数句柄
%              wd只能取字符串'line'或 'circle'
%              x,y 是以t为独立参数的横、纵坐标变量 x=sin(t) 和 y=cos(t)

t=(0:100)/100*2*pi;
x=sin(t);
y=cos(t);
Hr=@cirline;   %创建子函数的句柄 
feval(Hr,flag,x,y,t)
% -------------subfunction---------------------------
function cirline(wd,x,y,t)
% wd           接受字符串'line'或'circle'
% t            画线用的独立参变量
% x            由t产生的横坐标变量
% y            由t产生的纵坐标变量
switch wd
case 'line'
    plot(t,x,'b' ,t,y,'r','LineWidth',2)
case 'circle'
    plot(x,y,'g.','MarkerSize',30),
    axis square off
otherwise
    error('输入宗量只能取 ''line'' 或 ''circle'' ！ ')
end
shg