内容简介作者简介 - 科学与工程计算系

subplot(1,3,2),exm07052_1(r1,r2,'Marker','o')
subplot(1,3,3),exm07052_1(r1,r2,'LineWidth',5,'Color',[1 0.4 0])
0.5
-0.5
7.5.3 跨空间变量传递
1
0
-1
-1 0 1
-0.5
7.5.3.1 跨空间计算串表达式的值
1
0.5
0
-1
-1 0 1
图 7.5-1
7
1
0.5
0
-0.5
-1
-1 0 1
【例 7.5.3.1-1】本例演示:(A)编写绘制正多边形或圆的程序。(B)子函数与(母)函
数的关系。(C)各种不同的工作空间。(D)evalin 运行机理与 eval 的异同。
(1)
[exm070531_1.m]
function y1=exm070531_1(a,s)
t=(0:a)/a*2*pi;
y1=subevalinzzy(4,s);
%------------ subfunction -------------
function y2=subevalinzzy(a,s)
t=(0:a)/a*2*pi;ss='a*exp(i*t)';
switch s
case {'base','caller'}
y2=evalin(s,ss);
case 'self'
y2=eval(ss);
end
(2)
clear,a=30;t=(0:a)/a*2*pi;sss={'base','caller','self'};
for k=1:3
y0=exm070531_1(8,sss{k});
subplot(1,3,k)
plot(real(y0),imag(y0),'r','LineWidth',3),axis square image
end