diff --git a/src/SAR1Q1.m b/src/SAR1Q1.m new file mode 100644 index 0000000000000000000000000000000000000000..8fbdede5a8a6eed82defe47d1f25557690b42821 --- /dev/null +++ b/src/SAR1Q1.m @@ -0,0 +1,33 @@ +% Liste des fichiers audio à analyser +fichiers = {'single_tone_violin-a3.wav', 'nylon-guitar.wav', 'single_tone_guitar-pitch-pipe-a3.wav', 'single_tone_sax-soprano-a3.wav', 'single_tone_trumpet-a3.wav'}; + +% Boucle sur les fichiers +for i = 1:5 + % Chargement du fichier + + [x, fe] = audioread(fullfill('wav',fichiers{i})); + + % Conversion en mono si stéréo + if size(x, 2) > 1 + x = mean(x, 2); + end + + % Longueur du signal + N = length(x); + + % Calcul de la FFT et centrage + X = fftshift(fft(x)); + f = linspace(-fe/2, fe/2, N); + + % Amplitude en dB + amplitude_dB = 20 * log10(abs(X) + eps); % eps pour éviter log(0) + + % Affichage du spectre + figure; + plot(f, amplitude_dB, 'b'); + xlabel('Fréquence (Hz)'); + ylabel('Amplitude (dB)'); + title(['Spectre de : ', fichiers{i}], 'Interpreter', 'none'); + grid on; + xlim([-fe/2 fe/2]); +end \ No newline at end of file