Mercurial > hg > mauch-mirex-2010
annotate _misc/featureextraction/readaudiochunk.m @ 9:4ea6619cb3f5 tip
removed log files
author | matthiasm |
---|---|
date | Fri, 11 Apr 2014 15:55:11 +0100 |
parents | b5b38998ef3b |
children |
rev | line source |
---|---|
matthiasm@8 | 1 |
matthiasm@8 | 2 % Read in an audio file |
matthiasm@8 | 3 |
matthiasm@8 | 4 |
matthiasm@8 | 5 function [audiodata, info] = readaudiochunk(info) |
matthiasm@8 | 6 |
matthiasm@8 | 7 fprintf(1,'reading audio chunk\n'); |
matthiasm@8 | 8 |
matthiasm@8 | 9 % read in wav file |
matthiasm@8 | 10 |
matthiasm@8 | 11 [rawdata, info.fs] = wavread(info.filename,[info.startsample info.endsample]); |
matthiasm@8 | 12 |
matthiasm@8 | 13 info.fsdownsampled = info.fs; |
matthiasm@8 | 14 |
matthiasm@8 | 15 % take average of stereo signals to give one mono audio vector |
matthiasm@8 | 16 |
matthiasm@8 | 17 meandata = mean(rawdata,2); |
matthiasm@8 | 18 |
matthiasm@8 | 19 % normalise audio |
matthiasm@8 | 20 if max(meandata) > 0.00001 |
matthiasm@8 | 21 audiodata = meandata/max(meandata); |
matthiasm@8 | 22 else |
matthiasm@8 | 23 audiodata = meandata; |
matthiasm@8 | 24 end |
matthiasm@8 | 25 |
matthiasm@8 | 26 |
matthiasm@8 | 27 |
matthiasm@8 | 28 |
matthiasm@8 | 29 |
matthiasm@8 | 30 |