diff 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
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/demo6curves.m	Fri Aug 19 13:07:06 2016 +0200
@@ -0,0 +1,68 @@
+function demo6curves(file)
+% Example of use of curve analysis tools, such as moment estimations.
+
+if nargin == 0
+    file = 'trumpet';
+end
+
+s = mirspectrum(file)
+mircentroid(s)
+mirspread(s)
+mirskewness(s)
+mirkurtosis(s)
+mirflatness(s)
+mirregularity(s)
+mirentropy(s)
+clear s
+
+e = mirenvelope(file)
+mircentroid(e)
+mirspread(e)
+mirskewness(e)
+mirkurtosis(e)
+mirflatness(e)
+mirentropy(e)
+
+display('Strike any key to continue...');
+pause
+close all
+
+s = mirspectrum(file,'Frame',.1,1)
+mircentroid(s)
+mirspread(s)
+mirskewness(s)
+mirkurtosis(s)
+mirflatness(s)
+mirregularity(s)
+mirentropy(s)
+clear s
+
+display('Strike any key to continue...');
+pause
+close all
+
+fe = mirframe(e,.1,1)
+clear e
+mircentroid(fe)
+mirspread(fe)
+mirskewness(fe)
+mirkurtosis(fe)
+mirflatness(fe)
+mirentropy(fe)
+clear fe
+
+display('Strike any key to continue...');
+pause
+close all
+
+if nargin == 0
+    file = 'czardas';
+end
+t = mirtempo(file,'Periodicity','Frame')
+h = mirhisto(t)
+clear t
+mircentroid(h)
+mirspread(h)
+mirskewness(h)
+mirkurtosis(h)
+mirflatness(h)
\ No newline at end of file