ea405.m

matlab 在线性代数中的应用 利用matlab实现可以提高对所学知识的理解 更有助于你考研

%《工程线性代数（MATLAB版）》第四章例题程序ea405
% 电子工业出版社出版  陈怀琛 高淑萍 杨威合著 2007年5月
% 两维线性变换的几何形象
%
x=[0,1,1,0;0,0,1,1];
subplot(2,3,1),
fill([x(1,:),0],[x(2,:),0],'r')
axis equal,axis([-1.5,1.5,-1,2]),grid on
title('(a) x=[0,1,1,0;0,0,1,1]')
A1=[-1,0;0,1]
y1=A1*x
subplot(2,3,2),
fill([y1(1,:),0],[y1(2,:),0],'g')
axis equal,axis([-1.5,1.5,-1,2]),grid on
title('(b)A1=[-1,0;0,1]')
A2=[2,0;0,0.5]
y2=A2*x
subplot(2,3,3),
fill([y2(1,:),0],[y2(2,:),0],'g')
axis equal,axis([-1.5,1.5,-1,2]),grid on
title('(c)A2=[2,0;0,0.5]')
A3=[1,2;2,2]
y3=A3*x
subplot(2,3,4),
fill([y3(1,:),0],[y3(2,:),0],'g')
axis equal,grid on
title('(d)A3=[1,2;2,2]')
A4=[1,0.5;0,1]
y4=A4*x
subplot(2,3,5),
fill([y4(1,:),0],[y4(2,:),0],'g')
axis equal,axis([-1.5,1.5,-1,2]),grid on
title('(e)A4=[1,0.5;0,1]')
t=pi/6,
A5=[cos(t),-sin(t);sin(t),cos(t)]
y5=A5*x
subplot(2,3,6),
fill([y5(1,:),0],[y5(2,:),0],'g')
axis equal,axis([-1.5,1.5,-1,2]),grid on
title('(f)A5=[cos(t),-sin(t);sin(t),cos(t)]')
set(gcf,'color','w')