Détection de signaux sourds et sonores
Détectez les segments sourds et atténuez-les.
In[1]:=
![Click for copyable input](assets.fr/voiced-vs-unvoiced-detection/In_42.png)
a = ExampleData[{"Audio", "NoisyTalk"}, "Audio"]
Utilisez AudioIntervals pour rechercher des segments à faible amplitude RMS et à planéité spectrale élevée.
In[2]:=
![Click for copyable input](assets.fr/voiced-vs-unvoiced-detection/In_43.png)
nonVoicedIntervals =
AudioIntervals[
a, #RMSAmplitude < .02 && #SpectralFlatness > .0001 &, .1,
PartitionGranularity -> {.06, .01}]
Out[2]=
![](assets.fr/voiced-vs-unvoiced-detection/O_20.png)
Visualisez les intervalles détectés.
In[3]:=
![Click for copyable input](assets.fr/voiced-vs-unvoiced-detection/In_44.png)
AudioPlot[a,
Epilog -> {RGBColor[1, 0, 0, .3],
Rectangle[{#[[1]], -1}, {#[[2]], 1}] & /@ nonVoicedIntervals},
ImageSize -> Medium]
Out[3]=
![](assets.fr/voiced-vs-unvoiced-detection/O_21.png)
Atténuez les intervalles détectés.
In[4]:=
![Click for copyable input](assets.fr/voiced-vs-unvoiced-detection/In_45.png)
AudioJoin[
Riffle[AudioFade /@ AudioTrim[a, Except@nonVoicedIntervals],
0.3*AudioTrim[a, nonVoicedIntervals]]]