Mercurial > hg > camir-aes2014
annotate toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/demo2timbre.m @ 0:e9a9cd732c1e tip
first hg version after svn
author | wolffd |
---|---|
date | Tue, 10 Feb 2015 15:05:51 +0000 |
parents | |
children |
rev | line source |
---|---|
wolffd@0 | 1 function demo2timbre |
wolffd@0 | 2 |
wolffd@0 | 3 try |
wolffd@0 | 4 cd('train_set') |
wolffd@0 | 5 catch |
wolffd@0 | 6 end |
wolffd@0 | 7 |
wolffd@0 | 8 a = miraudio('Folder'); |
wolffd@0 | 9 |
wolffd@0 | 10 z = mirzerocross(a) |
wolffd@0 | 11 disp('Ascending order of zero crossing...') |
wolffd@0 | 12 mirplay(a,'Increasing',z,'Every',5) |
wolffd@0 | 13 |
wolffd@0 | 14 l = mirlowenergy(a) |
wolffd@0 | 15 disp('Ascending order of low energy rate...') |
wolffd@0 | 16 mirplay(a,'Increasing',l,'Every',5) |
wolffd@0 | 17 |
wolffd@0 | 18 c = mircentroid(a) |
wolffd@0 | 19 disp('Ascending order of spectral centroid...') |
wolffd@0 | 20 mirplay(a,'Increasing',c,'Every',5) |
wolffd@0 | 21 |
wolffd@0 | 22 r = mirrolloff(a) |
wolffd@0 | 23 disp('Ascending order of spectral roll-off...') |
wolffd@0 | 24 mirplay(a,'Increasing',r,'Every',5) |
wolffd@0 | 25 |
wolffd@0 | 26 i = mirregularity(a) |
wolffd@0 | 27 disp('Ascending order of spectral irregularity...') |
wolffd@0 | 28 mirplay(a,'Increasing',i,'Every',5) |
wolffd@0 | 29 |
wolffd@0 | 30 e = mirentropy(a) |
wolffd@0 | 31 disp('Ascending order of spectral entropy...') |
wolffd@0 | 32 mirplay(a,'Increasing',e,'Every',5) |