Dawn@4: function [] = get_Shimmer( dirName, statsFileID )
Dawn@4: 
Dawn@4: % this function collates the results of all values calculated using the PRAAT software 
Dawn@4: 
Dawn@4: % For jitter and shimmer PRAAT returns only a single value, not a
Dawn@4: % frame-by-frame calculation. Therefore we cannot find the varience etc.
Dawn@4: 
Dawn@4: 
Dawn@4:     % identify the speaker in the stats file
Dawn@4:     fprintf( statsFileID, '%s ', dirName );
Dawn@4: 
Dawn@4: %-------------- get the shimmer metrics ----------------------
Dawn@4: %     SHIMMER: local \t dda \t apq3 \t apq5 \t apq11
Dawn@4: 
Dawn@4:     metricName = '_shimmer_local';
Dawn@4:     metricFileName = [ dirName metricName '.txt'];
Dawn@4:     readValueFromFile( statsFileID, metricFileName, metricName );
Dawn@4: 
Dawn@4:     metricName = '_shimmer_dda';
Dawn@4:     metricFileName = [ dirName metricName '.txt'];
Dawn@4:     readValueFromFile( statsFileID, metricFileName, metricName );
Dawn@4:     
Dawn@4:     metricName = '_shimmer_apq3';
Dawn@4:     metricFileName = [ dirName metricName '.txt'];
Dawn@4:     readValueFromFile( statsFileID, metricFileName, metricName );
Dawn@4:     
Dawn@4:     metricName = '_shimmer_apq5';
Dawn@4:     metricFileName = [ dirName metricName '.txt'];
Dawn@4:     readValueFromFile( statsFileID, metricFileName, metricName );
Dawn@4:     
Dawn@4:     metricName = '_shimmer_apq11';
Dawn@4:     metricFileName = [ dirName metricName '.txt'];
Dawn@4:     readValueFromFile( statsFileID, metricFileName, metricName );
Dawn@4:     
Dawn@4:     fprintf( statsFileID, '\n');
Dawn@4:     
Dawn@4: