comparison toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/demo6curves.m @ 0:e9a9cd732c1e tip

first hg version after svn
author wolffd
date Tue, 10 Feb 2015 15:05:51 +0000
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:e9a9cd732c1e
1 function demo6curves(file)
2 % Example of use of curve analysis tools, such as moment estimations.
3
4 if nargin == 0
5 file = 'trumpet';
6 end
7
8 s = mirspectrum(file)
9 mircentroid(s)
10 mirspread(s)
11 mirskewness(s)
12 mirkurtosis(s)
13 mirflatness(s)
14 mirregularity(s)
15 mirentropy(s)
16 clear s
17
18 e = mirenvelope(file)
19 mircentroid(e)
20 mirspread(e)
21 mirskewness(e)
22 mirkurtosis(e)
23 mirflatness(e)
24 mirentropy(e)
25
26 display('Strike any key to continue...');
27 pause
28 close all
29
30 s = mirspectrum(file,'Frame',.1,1)
31 mircentroid(s)
32 mirspread(s)
33 mirskewness(s)
34 mirkurtosis(s)
35 mirflatness(s)
36 mirregularity(s)
37 mirentropy(s)
38 clear s
39
40 display('Strike any key to continue...');
41 pause
42 close all
43
44 fe = mirframe(e,.1,1)
45 clear e
46 mircentroid(fe)
47 mirspread(fe)
48 mirskewness(fe)
49 mirkurtosis(fe)
50 mirflatness(fe)
51 mirentropy(fe)
52 clear fe
53
54 display('Strike any key to continue...');
55 pause
56 close all
57
58 if nargin == 0
59 file = 'czardas';
60 end
61 t = mirtempo(file,'Periodicity','Frame')
62 h = mirhisto(t)
63 clear t
64 mircentroid(h)
65 mirspread(h)
66 mirskewness(h)
67 mirkurtosis(h)
68 mirflatness(h)