時系列を使って音声を生成する
規則的にサンプルされたTimeSeriesで正弦波の周波数を制御する．
In[1]:=
n = 50;
frequencies = RandomReal[{100, 300}, n];
reg = TimeSeries[frequencies, {0, Automatic, .3}];In[2]:=
AudioGenerator[{"Sin", reg}]Out[2]=
不規則にサンプルされたTimeSeriesで正弦波の周波数を制御する．
In[3]:=
times = Accumulate[RandomReal[{0.1, .5}, n]];
irreg = TimeSeries[frequencies, {times}];In[4]:=
AudioGenerator[{"Sin", irreg}]Out[4]=
WhiteNoiseProcessを使ってホワイトノイズを生成する．
In[5]:=
sample = RandomFunction[WhiteNoiseProcess[1/3], {88200}]Out[5]=
サンプルを2秒の長さに再スケールし，音声を生成する．
In[6]:=
AudioNormalize@
AudioGenerator[TimeSeriesRescale[sample, {0, 2, 1/44100}]]Out[6]=
In[7]:=
AudioNormalize@
AudioGenerator[TimeSeriesRescale[sample, {0, 2, 1/44100}]];
AudioPlot[%]Out[7]=
FractionalGaussianNoiseProcessを直接使って，異なるタイプのノイズを生成する．
In[8]:=
AudioNormalize@AudioGenerator[FractionalGaussianNoiseProcess[1/3], 2]Out[8]=
In[9]:=
AudioNormalize@AudioGenerator[FractionalGaussianNoiseProcess[1/3], 2];
AudioPlot[%]Out[9]=
