%***************************************%
% wavファイル処理                       %
% 遅延フィルタ                          %
%         by Arata Kawamura (2021.05.22)%
%***************************************%
clear;
% 音声信号(s)とサンプリング周波数(Fs)を読み込む
[s, Fs] = audioread("speech.wav"); 
s = [zeros(Fs,1); s]; % 先頭に0を1秒追加 (縦ベクトル)
% wavを書き出す
audiowrite("output.wav", s, Fs);
