summaryrefslogtreecommitdiff
path: root/52/CH1/EX1.37/Example1_37.sce
blob: 6f140f082d02297b399fb6cfd1c3caa99a3a7c05 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
//Example 1.37
//Program to Plot Magnitude and Phase Responce
//y(n)=1/2[x(n)+x(n-2)]
clear;
clc ;
close ;
w=0:0.01:%pi;
H=(1+cos(2*w)-%i*sin(2*w))/2;
//caluculation of Phase and Magnitude of H
[phase_H,m]=phasemag(H);
Hm=abs(H);
a=gca();
subplot(2,1,1);
a.y_location="origin";
plot2d(w/%pi,Hm);
xlabel('Frequency in Radians')
ylabel('abs(Hm)');
title('MAGNITUDE RESPONSE');
subplot(2,1,2);
a=gca();
a.x_location="origin";
a.y_location="origin";
plot2d(w/(2*%pi),phase_H);
xlabel('Frequency in Radians');
ylabel('<(H)');
title('PHASE RESPONSE');