clear
close all

load ../First_try/infos_machine
force=transpose(force(1:20:end));
force=force(2:end);

load ID_result

figure
hold on 
plot(force,'k')
%plot(ID(end).Fcaleq{1},'b')        
%plot(ID(end).Fcaleq{2},'g')        
plot(ID(end).Fcaleq{3},'r')
set(gca,'Fontsize',14)
legend('Mesure','Calcul','Fontsize',14)

for ns=1:numel(ID(end).Fcaleq)-1
	Sf{ns}=ID(end).Fcaleq{4}-ID(end).Fcaleq{ns};
end

figure
hold on
plot(Sf{1},'k')
plot(Sf{2},'r')
plot(Sf{3},'b')
legend('1','2','3','Fontsize',14)