32 lines
581 B
Mathematica
32 lines
581 B
Mathematica
|
%% Exercício 2
|
||
|
|
function DiogoEliseu_TP2_2(N1, N2)
|
||
|
|
n = N1:N2;
|
||
|
|
|
||
|
|
% Impulso def
|
||
|
|
impulso = zeros(1, abs(N1) + N2 + 1);
|
||
|
|
impulso(ceil(length(n)/2)) = 1;
|
||
|
|
|
||
|
|
% Degrau def
|
||
|
|
degrau = (n >= 0);
|
||
|
|
|
||
|
|
% Figura com os resultados
|
||
|
|
figure
|
||
|
|
% Plot da sequência X
|
||
|
|
subplot(2,2,1:2)
|
||
|
|
x = fun_x(n);
|
||
|
|
stem(n, x)
|
||
|
|
% Plot do impulso
|
||
|
|
subplot(2,2,3)
|
||
|
|
stem(n, impulso)
|
||
|
|
% Plot do degrau
|
||
|
|
subplot(2,2,4)
|
||
|
|
stem(n, degrau)
|
||
|
|
end
|
||
|
|
|
||
|
|
%% Definição da sequência X
|
||
|
|
function p = fun_x(N)
|
||
|
|
A=1.8;
|
||
|
|
f=0.05;
|
||
|
|
phi=0.5*pi;
|
||
|
|
p=A*cos(2*pi*f*N+phi);
|
||
|
|
end
|