%
% Ploteo de funciones. Ejemplo 5.
%
pi180 = pi / 180;

x = -180:20:180;
y = sin(pi180 * x) + 0.6 * sin(2.3 * pi180 * x);
%
close all;
f1 = figure;

subplot(2, 2, 1, 'FontSize', 12);

plot(x, y, 'r');

xlim([-180 180]);
ylim([-2 2]);
xlabel('\theta [°]');
ylabel('y(\theta)');
line([-180 180], [0 0], 'LineWidth', 0.5, ...
                        'LineStyle', ':', 'Color', 'k');
line([0 0], [-2 2], 'LineWidth', 0.5, ...
                    'LineStyle', ':', 'Color', 'k');
                    

subplot(2, 2, 2, 'FontSize', 12);

bar(x, y);

xlim([-180 180]);
ylim([-2 2]);
xlabel('\theta [°]');
ylabel('y(\theta)');

line([0 0], [-2 2], 'LineWidth', 0.5, ...
                    'LineStyle', ':', 'Color', 'k');

subplot(2, 2, 3, 'FontSize', 12);

stairs(x, y);

xlim([-180 180]);
ylim([-2 2]);
xlabel('\theta [°]');
ylabel('y(\theta)');
line([-180 180], [0 0], 'LineWidth', 0.5,...
                        'LineStyle', ':', 'Color', 'k');
line([0 0], [-2 2], 'LineWidth', 0.5,...
                    'LineStyle', ':', 'Color', 'k');

subplot(2, 2, 4, 'FontSize', 12);

stem(x, y, 'MarkerSize', 3, 'MarkerEdge', 'k', 'MarkerFace', 'k');

xlim([-180 180]);
ylim([-2 2]);
xlabel('\theta [°]');
ylabel('y(\theta)');
line([-180 180], [0 0], 'LineWidth', 0.5,...
                        'LineStyle', ':', 'Color', 'k');
line([0 0], [-2 2], 'LineWidth', 0.5,...
                        'LineStyle', ':', 'Color', 'k');
