summaryrefslogtreecommitdiff
path: root/758/CH6/EX6.36/Ex_6_36.sce
blob: 1cc3bb2fe67a71f5016f326cb2925605a0256d67 (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
27
28
//Example 6.36

clc;clear;close;
x=[1 0 0 1];
h=[4 3 2 1];
ylength=length(x)+length(h)-1;
xlength=length(x);
x=[zeros(1,length(h)-1) x zeros(1,length(h)-1)];
y=0;
//Calculation of cross correlation
for n=1:ylength;
    y(n)=x*[zeros(1,n-1) h zeros(1,ylength-n)]';           //this instruction performs cross correlation of x & h
end                                 

disp(x,'First Sequence is x(n): ');
disp(h,'Second Sequence is h(n): ');
disp(y,'Correlation Sequence y[n] is');
figure;
subplot(3,1,1);
plot2d3(x);
title('First Seqence x[n]:');ylabel('Amplitude-->');xlabel('n-->')
subplot(3,1,2);
plot2d3(h);
title('Second Seqence h[n]:');ylabel('Amplitude-->');xlabel('n-->')
subplot(3,1,3);
plot2d3(y);
title('Correlation Seqence y[n]:');ylabel('Amplitude-->');xlabel('n-->')