load signal_inconnu3;
%s = ones(1,100); % pour faire des essais,
% il faut size(s) >> taille_filtre

taille_signal = size(s, 2);

clf;

figure(1);
%subplot(1,2,1);
plot(s,'r*-');
grid,

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% son filtrage avec une moyenne glissante

taille_filtre = 17; %plutot prendre une valeur impaire
h = 1/taille_filtre * ones(1, taille_filtre);

f = conv(s, h);
%taille(f) = taille(s) + taille(h) + 1
%ici on choisit de couper f de façon à le superposer à s
resul = f( (taille_filtre+1)/2 : size(f,2) + 1 - ((taille_filtre+1)/2) );

%subplot(1,2,2);
hold on;
plot(resul, 'g*-');