1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
| clear all
close all
cd('D:\Travail\TRAITEMENT_BF\etude_bf');
[X{1:12}] = textread('Valeurs_bf_etude_2.txt','%d%s%s%f%f%f%f%f%f%f%f%f','headerlines',1);
num_image = X{1}();
directory = X{2}();
type_v1 = X{3}();
rms_v1 = X{4}();
disp_v1 = X{5}();
std_v1 = X{6}();
dep_v1 = X{6}();
dep_spect_v1 = X{7}();
integ_spect_v1 = X{8}();
moyen_spect_v1 = X{9}();
ratio_moy = X{10}();
pourcent_baisse_moy = X{11}();
pourcent_baisse_20 = X{12}();
% Groupe tous les paramètres dans une matrice data
data = [rms_v1, disp_v1, dep_v1, dep_spect_v1, integ_spect_v1, moyen_spect_v1,...
ratio_moy, pourcent_baisse_moy, pourcent_baisse_20 ];
% Vecteur correspondant aux noms des paramètres
name_data = {'rms signal' 'disp signal' 'dep signal', 'dep spectrale' 'integrale spectrale' 'moyenne spectrale'...
'ratio spectre' 'pourcent baisse spectrale (pas=moyenne)' 'pourcent baisse spectrale (pas=20)' };
% Défini les nuages de points à ploter, ex: 1,2 : plot de RMS signal vs Disp signal.
% ci-dessous : TOUS LES PLOTS
% curves = [1,2;1,3;1,4;1,5;1,6;1,7;1,8;1,9;2,3;2,4;2,5;2,6;2,7;2,8;2,9;3,4;3,5;3,6;3,7;3,8;3,9;4,5;4,6;4,7;...
% 4,8;4,9;5,6;5,7;5,8;5,9;6,7;6,8;6,9;7,8;7,9;8,9] ;
% ci-dessous : PLOT A DEFINIR
curves =[1,2]
[type_ordr_alphab,a,b] = unique(type_v1) ;
% Boucle de traçage de tous les plots, aggandissement de l'image avec
% maximize et enregistrement automatique en .bmp
for i_curve = 1:size(curves,1)
h = figure(i_curve) ;
map = hsv(10);
colormap(map) ;
gscatter(data(:,curves(i_curve,1)), data(:,curves(i_curve,2)),type_v1,'ggggkrrmmrrbyyk','.x*++.x.xds..s.');
xlabel(name_data(curves(i_curve,1)),'Interpreter','none') ;
ylabel(name_data(curves(i_curve,2)),'Interpreter','none') ;
dcm=datacursormode(gcf);
set(dcm,'UpdateFcn',@updatefcn_data);
datacursormode on
setappdata(gcf,'nom_fich',directory);
n1 = name_data(curves(i_curve,1)) ;
n2 = name_data(curves(i_curve,2)) ;
titre = ([n1{:,:}() ' vs ' n2{:,:}()]) ;
title(titre,'fontsize',13) ;
maximize(h);
print (gcf, '-dbmp', titre)
%saveas(gcf,titre,'fig')
%saveas(gcf, titre, 'bmp');
end |
Partager