Similarity of Instrument Recordings

Use distance metric functions on audio features extracted from audio signals to compute similarity

Prepare a small collection of instrument recordings from

In[1]:=

instrumentLabels={"Flute","Clarinet","Oboe","Bassoon","FrenchHorn","Trumpet","Tuba","Cello","Viola","Violin"};

In[2]:=

instruments=Table[Sound[SoundNote[#,1,inst]&/@Range[7]],{inst,instrumentLabels}];

Listen to one of the instrument recordings:

In[3]:=

RandomChoice[instruments]

Out[3]=

Use

to measure the distance between two signals using the Euclidean distance computed on amplitude values:

In[4]:=

AudioDistance[instruments〚1〛,instruments〚2〛,DistanceFunctionEuclideanDistance]

Out[4]=

317.943

Measure the Euclidean distance between spectral components:

In[5]:=

AudioDistance[instruments〚1〛,instruments〚2〛,DistanceFunction"SpectralEuclidean"]

Out[5]=

709741.

Use

to compute the distance between signals. By default,

is set to

"AudioFeatures"

for audio signals to compute semantically significant features:

In[6]:=

m=DistanceMatrix[instruments,FeatureExtractor{"AudioFeatures","NumericVector"}];

Plot the result. The label colors are determined by the category that an instrument belongs to:

In[7]:=

MatrixPlotm,

frame ticks



Out[7]=

Related Symbols