Mercurial > hg > camir-aes2014
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) |