clf
clear all
set(0,'defaultaxesfontsize',20);
t=-6:.01:12;
%
plot1=Hmwk1Function(t);
%
plot2=Hmwk1Function(4+t);
%
plot3=Hmwk1Function(4-t);
%
plot4=Hmwk1Function(4-0.5*t);
%
% plot1=(t+1).*rect(t+1.5)+rect(t+0.5)+2*rect(t-0.5)+(2-t).*rect(t-1.5);
% tnew=4+t;
% plot2=(tnew+1).*rect(tnew+1.5)+rect(tnew+0.5)+2*rect(tnew-0.5)+(2-tnew).*rect(tnew-1.5);
% tnew=4-t;
% plot3=(tnew+1).*rect(tnew+1.5)+rect(tnew+0.5)+2*rect(tnew-0.5)+(2-tnew).*rect(tnew-1.5);
% tnew=4-0.5*t;
% plot4=(tnew+1).*rect(tnew+1.5)+rect(tnew+0.5)+2*rect(tnew-0.5)+(2-tnew).*rect(tnew-1.5);
% %
% tnew=-t;
% plot5=(tnew+1).*rect(tnew+1.5)+rect(tnew+0.5)+2*rect(tnew-0.5)+(2-tnew).*rect(tnew-1.5);
% plot6=0.5*(plot1+plot5);
% plot7=plot6.*unitstep(t);
%
subplot(2,2,1)
plot(t,plot1,'Linewidth',3)
grid
axis([min(t) max(t) -3 3])
set(gca,'XTick',[min(t):max(t)])
title('Original');
subplot(2,2,2)
plot(t,plot2,'Linewidth',3)
grid
axis([min(t) max(t) -3 3])
set(gca,'XTick',[min(t):max(t)])
title('tnew=4+t');
subplot(2,2,3)
plot(t,plot3,'Linewidth',3)
grid
axis([min(t) max(t) -3 3])
set(gca,'XTick',[min(t):max(t)])
title('tnew=4-t');
subplot(2,2,4)
plot(t,plot4,'Linewidth',3)
grid
axis([min(t) max(t) -3 3])
set(gca,'XTick',[min(t):max(t)])
title('tnew=4-0.5t');
