View difference between Paste ID: uAN2VcYb and gzzxHiqJ
SHOW: | | - or go back to the newest paste.
1-
%część 2:
1+
%część 3:
2
3-
%[x,fpx]=wavread('/home/c/mbi04czap.wav');
3+
%sinusoida
4-
[x,fpx]=audioread('/mbi04czap.wav');
4+
N=4000;
5-
Nx=length(x);
5+
fp=10000;
6-
tx=0:1/fpx:(Nx-1)/fpx;
6+
t=0:1/fp:(N-1)/fp;
7-
subplot(2,2,1);
7+
x=sin(2*pi*740*t);
8-
plot(tx,x);
8+
subplot(331);
9
plot(t,x);
10-
ylabel('sygnal');
10+
11
ylabel('sinus');
12
13
14
15
16
%histogram x
17-
Nfx=2^15;
17+
subplot(332);
18-
N21x=Nfx/2+1;
18+
nbins=51;
19-
v=fft(x,Nfx);
19+
hist(x,nbins);
20-
wx=abs(v);
20+
xlabel('wartosc probki');
21-
fx=linspace(0,fpx/2,N21x);
21+
ylabel('liczba probek w przedziale');
22-
subplot(2,2,2);
22+
23-
plot(fx,wx(1:N21x));
23+
24-
xlabel('czestotliwosc[Hz]');
24+
25-
ylabel('modul widma');
25+
26
27
% autokorelacja x
28
subplot(333);
29
kmax=1000;
30
rx=xcorr(x,x,kmax); 						%(sygnał, sygnał, "jak daleko w przeszłość i przyszłość mamy patrzeć 
31
											% żeby szukać korelacji")
32-
dr=8;
32+
tr=-kmax/fp:1/fp:kmax/fp;
33-
y=decimate(x,dr);
33+
plot(tr,rx);
34-
Ny=length(y);
34+
xlabel('przesuniecie [s]');
35-
fpy=fpx/dr;
35+
ylabel('autokorelacja');
36-
ty=0:1/fpy:(Ny-1)/fpy;
36+
37-
subplot(2,2,3);
37+
38-
plot(ty,y);
38+
39-
xlabel('czas[s]')
39+
40-
ylabel('sygnal po decymacji');
40+
41
42
43
44
45
46
%szum o rozkładzie równomiernym
47
subplot(334);
48-
Nfy=2^13;
48+
y=rand(1,N);
49-
N21y=Nfy/2+1;
49+
plot(t,y);
50-
v=fft(y,Nfy);
50+
51-
wy=abs(v);
51+
ylabel('szum rownomierny');
52-
fy=linspace(0,fpy/2,N21y);
52+
53-
subplot(2,2,4);
53+
54-
plot(fy,wy(1:N21y));
54+
55-
xlabel('czestotliwosc[Hz]');
55+
56-
ylabel('modul widma sygnalu po decymacji');
56+
57
58
%histogram y
59
subplot(335);
60
nbins=51;
61
hist(y,nbins);
62
xlabel('wartosc probki');
63
ylabel('liczba probek w przedziale');
64
65
66
67
%autokorelacja y
68
y=y-mean(y); % e
69
subplot(336);
70
ry=xcorr(y,y,kmax);
71
plot(tr,ry);
72
xlabel('przesuniecie [s]');
73
ylabel('autokorelacja');
74
75
76
77
78
79
80
81
82
83
%szum o rozkładzie normalnym, szum Gaussowski
84
subplot(337);
85
z=randn(1,N);
86
plot(t,z);
87
xlabel('wartosc probki');
88
ylabel('liczba probek w przedziale');
89
90
91
92
93
94
95
96
%histogram z
97
subplot(338);
98
nbins=51;
99
hist(z,nbins);
100
xlabel('wartosc probki');
101
ylabel('liczba probek w przedziale');
102
103
104
105
106
107
108
%autokorelacja z
109
subplot(339);
110
rz=xcorr(z,z,kmax);
111
plot(tr,rz);
112
xlabel('wartosc probki');
113
ylabel('liczba probek w przedziale');