comparison functions/funcsMobilab/read_data_develop.m @ 0:2fadb31a9d55 tip

Import code by Vuegen et al

+function [segments,samples,labels] = read_data_develop(directoryAudio,directoryAnnotation,new_fs)
+%%
+%   Mobilab 2012-2013  
+%   
+%   Input arguments:
+%       - directoryAudi: 
+%            Contains the path to the folder where the data is located
+%       - directoryAnnotation:
+%            Contains the path to the folders where the annotations are located
+%       - new_fs:
+%             Resample the .wav files to this sample frequency. If left
+%             blank, no resampling occur
+%   Output arguments
+%       - segments is a cell structure:
+%             Columns: # number of development examples
+%             Rows: # numer of annotators
+%             Each cell contains the segmented files from corresponding
+%             development file and annotator
+%       - samples is a cell structure:
+%             Same structure as segments. Each cell contains the start and
+%             stop time of the event.
+%       - labels is a cell structure:
+%             Same structure as segments. Each cell contains the labels of
+%             the corresponding events
+%% Defaults
+down=1; if nargin < 3; down=0; end
+%% Annotation
+addpath(directoryAudio);
+files=find_format(directoryAudio, '.wav');
+names=files.names;
+nrScripts = length(names);
+
+% Preallocation for speed
+segments=cell(1,nrScripts);
+samples=cell(1,nrScripts);
+labels=cell(1,nrScripts);
+
+for(scriptNr=1:nrScripts)
+   
+   [x_temp fs] = wavread(names{1,scriptNr});
+   if(down==1)
+       x_temp = resample(x_temp,new_fs,fs);
+       fs=new_fs;
+   end,
+       
+
+        addpath(directoryAnnotation);
+        files2=find_format(directoryAnnotation, 'txt');
+        annotation=textread(files2.names{1,i}, '%s' ,'delimiter', '\t');
+        startStop=zeros(length(annotation)/3,2);
+        id=cell(length(annotation)/3,1);
+        u=1;
+        for(v=1:3:length(annotation))
+            startStop(u,1)=str2num(annotation{v,1});
+            startStop(u,2)=str2num(annotation{v+1,1});
+            x{u,2}=fs;
+            x{u,1}=x_temp(ceil(startStop(u,1)*x{u,2})+1:ceil(startStop(u,2)*x{u,2}));
+            id{u,1}=annotation{v+2,1};
+            u=u+1;
+        end,
+        segments{k,i}=x;
+        samples{k,i}=startStop;
+        labels{k,i}=id;
+        rmpath(directoryAnnotation{k,1});
+        clear x;
+    end,
+end
+
+
+    
+    
+
+    
+    
+
+    
+
+  
+
+