TP-traitement-audio-visuel/TP10/exercice_2.m

37 lines
999 B
Mathematica
Raw Normal View History

2023-06-22 18:47:16 +00:00
% clear;
close all;
% load exercice_1;
% Paramètre à ajuster :
m = 100;
% Calcul de la TFCT :
[Y, valeurs_tau, valeurs_f] = TFCT(y, f_ech, n_fenetre, n_decalage, fenetre);
% Sélection des m coefficients de Fourier de plus grand module :
[valeurs_max, indices_max, taux_compression] = mp3(Y, m, length(y));
fprintf('Taux de compression : %.3f\n', taux_compression);
% Reconstitution de la TFCT à partir de indices_max et valeurs_max :
nb_colonnes = size(Y, 2);
Y_reconstitue = zeros(size(Y));
for i = 1:nb_colonnes
indices_max_i = indices_max(:, i);
Y_reconstitue(indices_max_i, i) = valeurs_max(:, i);
end
% Affichage de la TFCT reconstituée :
figure('units','normalized','outerposition',[0 0 1 1])
imagesc(valeurs_tau, valeurs_f, 20 * log10(abs(Y_reconstitue) + eps));
axis xy;
xlabel('Temps (s)');
ylabel('Frequence (Hz)');
title('Sonagramme de la TFCT reconstitue');
drawnow;
export_fig(gcf, "saves/" + filename + "_mp3.png", '-png', '-painters', '-m2');
% save exercice_2;