xr = linspace(-4*pi/9,4*pi/9,100);
y1r = sin(xr);
y2r = cos(xr);
y3r = tan(xr);
subplot(2,4,1)
plot(xr,y1r,'Linewidth',2)
xlabel('x[rad]')
ylabel('y_1')
title('sin')

subplot(2,4,5)
plot(xr,y2r,'r','Linewidth',2)
xlabel('x[rad]')
ylabel('y_2')
title('cos')

subplot(1,4,2)
plot(xr,y3r,'g','Linewidth',2)
xlabel('x[rad]')
ylabel('y_3')
title('tan')

xd = linspace(-80,80,100);
y1d = sind(xd);
y2d = cosd(xd);
y3d = tand(xd);
subplot(2,4,3)
plot(xd,y1d,'Linewidth',2)
xlabel('x[\circ]')
ylabel('y_1')
title('sind')

subplot(2,4,7)
plot(xd,y2d,'r','Linewidth',2)
xlabel('x[\circ]')
ylabel('y_2')
title('cosd')

subplot(1,4,4)
plot(xd,y3d,'g','Linewidth',2)
xlabel('x[\circ]')
ylabel('y_3')
title('tand')

