wavファイルを分割してランダムに再結合

実験刺激に対する統制刺激の作成等に

警告: コロン演算子をインデックスとして使う場合、整数オペランドが必要です。

という警告が出てくるが，実行自体はできているらしい

clear all;

[y,Fs]= audioread('sound.wav');

%%sound(y,Fs);

bin = 0.005; %何秒毎に切り取る 単位はs

len = floor(length(y)/(Fs*bin));

C = y(0*(Fs*bin)+1: (0+1)*(Fs*bin)+1);

for i=1:len-1

tmp = y(i*(Fs*bin)+1: (i+1)*(Fs*bin)+1);

C = vertcat(C, tmp);

%%wavwrite(tmp, fs, bps, sprintf("split_%03d.wav", i));

end

array = randperm(len);

dat_resemble = C(array(1),1:length(tmp));

for i=2:len

dat=C(array(i),1:(length(tmp)));

dat_resemble = horzcat(dat_resemble,dat);

end

audiowrite("resembled.wav",dat_resemble,Fs);