Graph with Two y-Axes

1.
R = 5; C = 1;

subplot(R,C,1);
x = linspace(0,2*pi,25);

y1 = sin(x);
% y2 = 0.5*sin(x);
y2 = exp(-1/3*x).*sin(x);
plot(x,y1);
grid on

hold on

stem(x,y2);

hold off

subplot(R,C,2);

A = 1000;
a = 0.005;
b = 0.005;
t = 0:900;
z1 = A*exp(-a*t);
z2 = sin(b*t);

[ax,p1,p2] = plotyy(t,z1,t,z2,'semilogy','plot');
ylabel(ax(1),'Semilog Plot') % label left y-axis
ylabel(ax(2),'Linear Plot') % label right y-axis
xlabel(ax(2),'Time') % label x-axis

p1.LineStyle = '--';
p1.LineWidth = 2;
p2.LineWidth = 2;

grid(ax(1),'on')