Homec4science
Diffusion PP routine (Interface-2.0) Browse

R11173/old/latex_v1.m
61de603d20bcInterface-2.0

Last Change
Raw File

latex_v1.m
View Options

function []= latex_v1(folder_save, pagename,projectname,nb,nbsensor,percentage,MP,alpha,nm,n11,Q11,hm,sigma,date1,dh_max,dh_min,dh_pp,fdom,dh_f,r_f,channel,folder,coeff_n,coeff_q,folder_results,projectname_title)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%Function defintition %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%This function is called by the function "Main" after calling the read and
%the calculate function. At this stage all the claculation have been
%performed. This function will first load the latex layout and fill it in
%with the results of the post processing calculation performed in the
%calculate function.
% Here is step by step what the function do :
% -open latex.tex, the latex layout and store it in the Cell A
% Find the lines where data need to be added in a matrix ind.
%[...]
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
page =1; % page iterative number
measure = 1; % measurement point iterative number
sensor =1; % sensor iterative number
curse=1;
ppm = ceil(nbsensor/4); % nb of page necessary for each measurement (if <4sensors we only one page per measurement if 4-8 sensor 2 pages, etc...)
last = mod(nbsensor,4); %number of graph on the last page per measuremet. For exemple if nbsensor = 5 last =1.
pagenb=ppm*nb; % total nb of pages. Total number of pdf pages to create
%% Open the latex file
idcs = strfind(folder,'\');
folder2 = folder(1:idcs(end)-1);
fid = fopen(fullfile(folder2,'latex_new_logos.tex'),'r'); % Latex.tex is the structure file that will be filled in.
i = 1;
tline = fgetl(fid);
A{i} = tline;
while ischar(tline)
i = i+1;
tline = fgetl(fid);
A{i} = tline;
end
fclose(fid);
Asave=A;
%% Separate the annex number:
%For example 715-07-D-01 we want to separate the 01 from the rest. The
%first part XXX-XX-X is constant while the last two digits increase.
tiret=find(pagename=='-');
l=max(tiret);
pagenamelast=pagename(l+1:end); % the last two digits.
pagenamefirst=pagename(1:l);% name of the annex corresponds to 715-07-D in the example
pagenb= str2double(pagenamelast);
%% Find lines where to change contents
% Celle ind will identify the lines of the tex files that need to be
% changed
ind{1}=find(strcmp(A,'%donnee1'));
ind{2}=find(strcmp(A,'%donnee2'));
ind{3}=find(strcmp(A,'%time1'));
ind{4}=find(strcmp(A,'%time2'));
ind{5}=find(strcmp(A,'%time3'));
ind{6}=find(strcmp(A,'%time4'));
ind{7}=find(strcmp(A,'%graph1'));
ind{8}=find(strcmp(A,'%graph2'));
ind{9}=find(strcmp(A,'%graph3'));
ind{10}=find(strcmp(A,'%graph4'));
ind{11}=find(strcmp(A,'\end{figure}'));
ind{12}=find(strcmp(A,'%freq1'));
ind{13}=find(strcmp(A,'%freq2'));
ind{14}=find(strcmp(A,'%freq3'));
ind{15}=find(strcmp(A,'%freq4'));
ind{16}=find(strcmp(A,'%entete'));
ind{17}=find(strcmp(A,'%channels'));
ind{18}=find(strcmp(A,'%final datas'));
ind{19}=find(strcmp(A,'%entete last'));
ind{20}=find(strcmp(A,'%coeffs'));
% Write the title of the pdf file
titre=['\textbf{MP} & $\bm{\alpha}$ & $\bm{',coeff_n,'}$ & $\bm{',coeff_q,'}$& $\bm{H_{\text{M}}}$ & $\bm{f_{\text{n}}}$ & $\bm{\sigma}$ \\'];
tete2=['\textbf{Channel n','$^{\circ}$}',' & $\boldsymbol{\frac{\Delta{H}_{max,', num2str(percentage), '\%', '}}{H_M}}$ & $\boldsymbol{\frac{\Delta{H}_{min,', num2str(percentage),'\%', '}}{H_M}}$ & $\boldsymbol{\frac{\Delta{H}_{pp,',num2str(percentage),'\%','}}{H_M}}$ &$\boldsymbol{f_{dominant}}$ & $\boldsymbol{\frac{\Delta{H}_{f,dominant}}{H_M}}$ & $\boldsymbol{\frac{f_{dominant}}{f_{n}}}\\'];
projectname_title=char(projectname_title);
projectname=char(projectname);
%% Add the correct time and frequency plot in the latex layout.
% The trick here is to have the right number of plot for each page. If we
% have 6 sensors, we need for each measurement poinrs the first 4 on th efirst page and the two last on
% a second page.
% If we have 8 sensors, we need for each measurements 4 plots on both
% pages.
%If we have 13 sensors, we need 3 full pages and one with only one sensor.
while measure<nb+1 % for all the MP files
while curse<ppm+1 % For all the pages per MP file
tbl{1}=[num2str(MP(measure)), ' & ', num2str(alpha(measure)), ' & ',num2str(n11(measure)), ' & ',num2str(Q11(measure)), ' & ',num2str(hm(measure)),' & ',sprintf('%.2f',abs(nm(measure)/60)),' & ',num2str(sigma(measure)),'\\'];
chan = ['\textbf{Channel n','$^{\circ}$',num2str(sensor),'} & \textbf{Channel n','$^{\circ}$', num2str(sensor+1),'} & \textbf{Channel n', '$^{\circ}$', num2str(sensor+2),'} & \textbf{Channel n','$^{\circ}$', num2str(sensor+3),'} \\'];
tete=['\textbf{', pagenamefirst, num2str(pagenb+page-1),'} & \centering \textbf{',projectname_title,'} & \hfill \textbf{', date1,'}'];
%add page nb.
if sensor<(ppm-1)*4 +1 ||ppm==1 || last==0 %if there are four graphs on the current page
tbl{2} = [channel{1}{sensor} , ' & ', channel{1}{sensor+1} , ' & ', channel{1}{sensor+2} , ' & ' channel{1}{sensor+3},'\\'];
tbl{3} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{4}= ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
tbl{5} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+2),'.pdf}'];
tbl{6} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+3),'.pdf}'];
tbl{7} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{8} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
tbl{9} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+2),'.pdf}'];
tbl{10} = ['\includegraphics[width=\linewidth]{images/',projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+3),'.pdf}'];
% Table on the bottom of the page:
tbl{11} = [num2str(sensor), '&', sprintf('%.3f',dh_max(measure,sensor)), '&', sprintf('%.3f',dh_min(measure,sensor)), '&',sprintf('%.3f',dh_pp(measure,sensor)), '&',sprintf('%.3f',fdom(measure,sensor)), '&',sprintf('%.3f',dh_f(measure,sensor)), '&',sprintf('%.3f',r_f(measure,sensor)), '\\'];
tbl{12} = [num2str(sensor+1), '&',sprintf('%.3f',dh_max(measure,sensor+1)), '&', sprintf('%.3f',dh_min(measure,sensor+1)), '&',sprintf('%.3f',dh_pp(measure,sensor+1)),'&',sprintf('%.3f',fdom(measure,sensor+1)),'&',sprintf('%.3f',dh_f(measure,sensor+1)),'&',sprintf('%.3f',r_f(measure,sensor+1)), '\\'];
tbl{13} = [num2str(sensor+2), '&',sprintf('%.3f',dh_max(measure,sensor+2)), '&', sprintf('%.3f',dh_min(measure,sensor+2)), '&',sprintf('%.3f',dh_pp(measure,sensor+2)),'&',sprintf('%.3f',fdom(measure,sensor+2)), '&',sprintf('%.3f',dh_f(measure,sensor+2)),'&',sprintf('%.3f',r_f(measure,sensor+2)),'\\'];
tbl{14} = [num2str(sensor+3), '&',sprintf('%.3f',dh_max(measure,sensor+3)), '&', sprintf('%.3f',dh_min(measure,sensor+3)), '&',sprintf('%.3f',dh_pp(measure,sensor+3)),'&',sprintf('%.3f',fdom(measure,sensor+3)), '&',sprintf('%.3f',dh_f(measure,sensor+3)),'&',sprintf('%.3f',r_f(measure,sensor+3)),'\\'];
sensor = sensor+4;
elseif last ==1 % if there is only one graph pn the last page of each MP
tbl{2} = [channel{1}{sensor},'\\'];
tbl{3} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{7} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
% Table on the bottom of the page:
tbl{11} = [num2str(sensor), '&', sprintf('%.3f',dh_max(measure,sensor)), '&', sprintf('%.3f',dh_min(measure,sensor)), '&',sprintf('%.3f',dh_pp(measure,sensor)), '&',sprintf('%.3f',fdom(measure,sensor)), '&',sprintf('%.3f',dh_f(measure,sensor)), '&',sprintf('%.3f',r_f(measure,sensor)), '\\'];
sensor = sensor+1;
elseif last ==2 % if there is only 2 graph pn the last page of each MP
tbl{2} = [channel{1}{sensor}, ' & ', channel{1}{sensor+1} ,'\\'];
tbl{3} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{4}= ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
tbl{7} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{8}= ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
% Table on the bottom of the page:
tbl{11} = [num2str(sensor), '&', sprintf('%.3f',dh_max(measure,sensor)), '&', sprintf('%.3f',dh_min(measure,sensor)), '&',sprintf('%.3f',dh_pp(measure,sensor)), '&',sprintf('%.3f',fdom(measure,sensor)), '&',sprintf('%.3f',dh_f(measure,sensor)), '&',sprintf('%.3f',r_f(measure,sensor)), '\\'];
tbl{12} = [num2str(sensor+1), '&',sprintf('%.3f',dh_max(measure,sensor+1)), '&', sprintf('%.3f',dh_min(measure,sensor+1)), '&',sprintf('%.3f',dh_pp(measure,sensor+1)),'&',sprintf('%.3f',fdom(measure,sensor+1)),'&',sprintf('%.3f',dh_f(measure,sensor+1)),'&',sprintf('%.3f',r_f(measure,sensor+1)), '\\'];
sensor = sensor+2;
else % if there is 3 graph pn the last page of each MP
tbl{2} = [channel{1}{sensor} ,' & ', channel{1}{sensor+1} ,' & ', channel{1}{sensor+2} ,'\\'];
tbl{3} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{4}= ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
tbl{5} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname '-timeplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+2),'.pdf}'];
tbl{7} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor),'.pdf}'];
tbl{8}= ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+1),'.pdf}'];
tbl{9} = ['\includegraphics[width=\linewidth]{images/', projectname, '/' projectname, '-freqplot-MP-' ,num2str(MP(measure)),'-',num2str(sensor+2),'.pdf}'];
% Table on the bottom of the page:
tbl{11} = [num2str(sensor), '&', sprintf('%.3f',dh_max(measure,sensor)), '&', sprintf('%.3f',dh_min(measure,sensor)), '&',sprintf('%.3f',dh_pp(measure,sensor)), '&',sprintf('%.3f',fdom(measure,sensor)), '&',sprintf('%.3f',dh_f(measure,sensor)), '&',sprintf('%.3f',r_f(measure,sensor)), '\\'];
tbl{12} = [num2str(sensor+1), '&',sprintf('%.3f',dh_max(measure,sensor+1)), '&', sprintf('%.3f',dh_min(measure,sensor+1)), '&',sprintf('%.3f',dh_pp(measure,sensor+1)),'&',sprintf('%.3f',fdom(measure,sensor+1)),'&',sprintf('%.3f',dh_f(measure,sensor+1)),'&',sprintf('%.3f',r_f(measure,sensor+1)), '\\'];
tbl{13} = [num2str(sensor+2), '&',sprintf('%.3f',dh_max(measure,sensor+2)), '&', sprintf('%.3f',dh_min(measure,sensor+2)), '&',sprintf('%.3f',dh_pp(measure,sensor+2)),'&',sprintf('%.3f',fdom(measure,sensor+2)), '&',sprintf('%.3f',dh_f(measure,sensor+2)),'&',sprintf('%.3f',r_f(measure,sensor+2)),'\\'];
sensor = sensor+3;
end
t_latex_2=toc;
%% The newlines to be written in the latex are now stored in the tbl matrix
%We will now write tbl in the matrix A containing all the .tex file at the
%lines we stored in matrix ind.
for idx=1:6
A{ind{idx}+1} = tbl{idx};
end
A{ind{12}+1} = tbl{7};
A{ind{13}+1} = tbl{8};
A{ind{14}+1} = tbl{9};
A{ind{15}+1} = tbl{10};
A{ind{16}+1} = tete;
A{ind{17}+1} = chan;
%final table
A{ind{18}+1} = tbl{11};
A{ind{18}+2} = tbl{12};
A{ind{18}+3} = tbl{13};
A{ind{18}+4} = tbl{14};
A{ind{19}+1} = tete2;
A{ind{20}+1} = titre;
%% Delete the redondant graphs and the redundant columns of last table
if mod(page,ppm)==0
if last==1
for i=ind{8}:(ind{11}-1)
A{i}=[];
end
for i=ind{18}+2:(ind{18}+4)
A{i}=[];
end
elseif last==2
for i=ind{9}:(ind{11}-1)
A{i}=[];
end
for i=ind{18}+3:(ind{18}+4)
A{i}=[];
end
elseif last==3
for i=ind{10}:(ind{11}-1)
A{i}=[];
end
for i=ind{18}+4:(ind{18}+4)
A{i}=[];
end
end
end
%% Write the updated latex files
tempdirectory=fullfile(folder,'\Results');
mkdir(tempdirectory);
%Remove space from the project name otherwise latex is unhappy.
% space=strfind(project_name, ' ');
% project_name_save=project_name;
% project_name_save(space)='_';
nom=strcat(tempdirectory, '\',projectname,'-MP', num2str(MP(measure)),'-',num2str(curse),'.tex');
fid = fopen(nom, 'w');
for i = 1:numel(A)
if A{i+1} == -1
fprintf(fid,'%s', A{i});
break
else
fprintf(fid,'%s\n', A{i});
% fid=A;
end
end
fclose(fid)
A=Asave;
% First page has been updated
page=page+1;
curse=curse+1;
end
measure = measure +1;
sensor=1;
curse=1;
end
%% Convert the latex to pdf.
% This part is where matlab calls miktex to create a pdf from the latex. It
% doesn't work if we don't change the currentdirectory
cd(fullfile(folder,'Results'))
% addpath(genpath('\\lmhnas2\Gem\Matlab\PP modeles\Matlab\Results'));
% addpath(genpath('\\lmhnas2\Gem\Matlab\PP modeles\Matlab\Results\images'));
% system('pdflatex -interaction=nonstopmode "test1.tex"');
% system('bibtex "test1"');
% system('pdflatex -interaction=nonstopmode "test1.tex"');
% setenv('PATH', [getenv('PATH') 'D:\Users\erdroz\AppData\Local\Programs\MiKTeX 2.9\miktex\bin\x64']);
% setenv('PATH', [getenv('PATH') '\\lmhnas2\Gem\Matlab\PP modeles\Matlab\Results']);
n=page;
for i=1:(measure-1)
for j=1:ppm
%sys=['pdflatex -interaction=nonstopmode ', num2str(project_name_save),num2str(i)];
%nom=[num2str(project_name_save),'-MP', num2str(MP(i)),'-',num2str(j)];
%fullname=fullfile(base, nom)
sys=['pdflatex -interaction=nonstopmode ', num2str(projectname),'-MP', num2str(MP(i)),'-',num2str(j)];
system(sys);
end
end
% system('pdflatex -interaction=nonstopmode "test1.tex"');
%
% % system('pdflatex -interaction=nonstopmode "test2.tex"');
% % system('bibtex "test2"');
% % system('pdflatex -interaction=nonstopmode "test2.tex"');
% system('pdflatex -interaction=nonstopmode "test2.tex"');
%
% % system('pdflatex -interaction=nonstopmode "test3.tex"');
% % system('bibtex "test3"');
% % system('pdflatex -interaction=nonstopmode "test3.tex"');
% system('pdflatex -interaction=nonstopmode "test3.tex"');
%% Copy the pdf created in the Matlab folder to a PDF folder in the project folder
abc=dir(fullfile(folder,'Results'));
j=1
for i=1:length(abc)
filestocopy1=strfind(abc(i).name,'pdf'); % find all the pdf files.
filestocopy2=strfind(abc(i).name,projectname); % find all the pdf files. with the projectname
for k= 1:length(MP)
filestocopy3(k)=isempty(strfind(abc(i).name,['MP',num2str(MP(k))]));
end
if isempty(filestocopy1)<1 && isempty(filestocopy2)<1 && sum(filestocopy3)<length(MP)
filestocopy(j)=i;
namecopy = abc(filestocopy(j)).name;
copyfile(namecopy, [folder_results,'\PDF'])
j=j+1;
end
end
%% Copy the .fig created
list=dir(fullfile(folder,'Results\images',projectname));
j=1
for i=1:length(list)
filestocopy1=strfind(list(i).name,'fig'); % find all the fig files.
filestocopy2=strfind(list(i).name,projectname); % find all the fig files.
for k= 1:length(MP)
filestocopyf3(k)=isempty(strfind(list(i).name,['MP-',num2str(MP(k)),'-']));
end
if isempty(filestocopy1)<1 && isempty(filestocopy2)<1 && sum(filestocopyf3)<length(MP)
filestocopy(j)=i;
namecopy = list(filestocopy(j)).name;
copyfile(fullfile(folder, 'Results\images\',projectname,namecopy), [folder_results,'\FIG'])
j=j+1;
end
end
save([folder_save 'latex'])
end
c4science · Help