Rapport Bilan Carbone de l'université Paris Diderot.

color=['r' 'b'];
col =
['Voi';'Cov';'2Ro';'VoP';'Bus';'TER';'MRT';'TG
V'];
figure
for i=1:b
subplot(4,2,i)
plot(Result(:,i),color(1,1))
hold on
plot(Result2(:,i),color(1,2))
title(col(i,:))
hold off
ylabel('Distance(km)','Fontsize',8)
xlabel('Nombre Universités','Fontsize',8)
end
txt=strcat('EvolutionErrModeTrans',num2str(k),
'Universités.png');
saveas(gcf,txt)
%% Evolution de l'erreur de base
figure
Resulttmppourcentage=Resulttmp*100
plot(Resulttmppourcentage)
ylabel('Erreur relative (%)')
xlabel('Nombre Universités')
txt=strcat('EvolutionErreurTotale',num2str(k),
'Universités.png');
saveas(gcf,txt)
%% Evolution des erreurs liées au calcul de la
distance totale
tmp=sum(ResumTmpTot');
tmp2=sum(ResumerrTmpTot');
Resulttmp=tmp2./tmp;
Result=tmp+tmp.*Resulttmp;
Result2=tmp-tmp.*(Resulttmp);
color=['r' 'b'];
figure
hold on
plot(Result,'g')
plot(Result2,'r')
ylabel('Distance(km)')
xlabel('Nombre Universités')
legend('Limite Basse','Limite Haute')
txt=strcat('EvolutionErrDistTot',num2str(k),'U
niversités.png');
saveas(gcf,txt)
function [dv dc dd dp db dt dm dg dverr dcerr
dderr dperr dberr dterr dmerr dgerr ndt dtot]
= routine_lecture(filename)
filename='donnees_updetu.xlsx';
[num,txt,raw]=xlsread(filename);
%relevé des distances par mode de transport
num(1,:)=[];len=size(num,1);
num(len,:)=[];
dv=num(:,8); %voiture
dc=num(:,10); %covoiturage
dd=num(:,12); %Deux roues
dp=num(:,14); %VoP
db=num(:,16); %Bus
dt=num(:,18); %TER
dm=num(:,20); %MRT
dg=num(:,22); %TGV
%distance totale
dtot=num(:,35);
%Erreur Distance par mode de transport
dverr=num(:,9);
dcerr=num(:,11);
dderr=num(:,13);
dperr=num(:,15);
dberr=num(:,17);
dterr=num(:,19);
dmerr=num(:,21);
dgerr=num(:,23);
ns=num(:,28);
nj=num(:,29);
ndt=ns(1:end).*nj(1:end);
end
2013 Rapport Méthodologique de Documentation de l’Outil Bilan Carbone 141