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

initial commit to HG from Changeset: 646 (e263d8a21543) added further path and more save "camirversion.m"
author Daniel Wolff
date Fri, 19 Aug 2016 13:07:06 +0200
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:cc4b1211e677
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)