wolffd@0: function demo2timbre
wolffd@0: 
wolffd@0: try
wolffd@0:     cd('train_set')
wolffd@0: catch
wolffd@0: end
wolffd@0: 
wolffd@0: a = miraudio('Folder');
wolffd@0: 
wolffd@0: z = mirzerocross(a)
wolffd@0: disp('Ascending order of zero crossing...')
wolffd@0: mirplay(a,'Increasing',z,'Every',5)
wolffd@0: 
wolffd@0: l = mirlowenergy(a)
wolffd@0: disp('Ascending order of low energy rate...')
wolffd@0: mirplay(a,'Increasing',l,'Every',5)
wolffd@0: 
wolffd@0: c = mircentroid(a)
wolffd@0: disp('Ascending order of spectral centroid...')
wolffd@0: mirplay(a,'Increasing',c,'Every',5)
wolffd@0: 
wolffd@0: r = mirrolloff(a)
wolffd@0: disp('Ascending order of spectral roll-off...')
wolffd@0: mirplay(a,'Increasing',r,'Every',5)
wolffd@0: 
wolffd@0: i = mirregularity(a)
wolffd@0: disp('Ascending order of spectral irregularity...')
wolffd@0: mirplay(a,'Increasing',i,'Every',5)
wolffd@0: 
wolffd@0: e = mirentropy(a)
wolffd@0: disp('Ascending order of spectral entropy...')
wolffd@0: mirplay(a,'Increasing',e,'Every',5)