Casestudie Breakdown prediction Contell PILOT - Transumo
Casestudie Breakdown prediction Contell PILOT - Transumo
Casestudie Breakdown prediction Contell PILOT - Transumo
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
if ~isnan(import.data(i,6));<br />
dooropenings = dooropenings + import.data(i,6);<br />
else disp(strcat('NaN found at_: ', datestr(date(position))));<br />
end<br />
end<br />
for i = starttime:minute:date(position+jumplength);<br />
ID = [ID; [i, round(10 * interp1([date(position),<br />
date(position+jumplength)],[import.data(position,2),<br />
import.data(position+jumplength,2)],i,'linear'))/10,dooropenings,import.dat<br />
a(position,4),import.data(position,5)]];<br />
dooropenings = 0; %To make sure, that number of dooropenings is only<br />
added once<br />
starttime = starttime + minute;<br />
%Correct calculation mistakes<br />
if mod(starttime,minute) >= second;<br />
starttime = (starttime - mod(starttime,minute)) + minute;<br />
end;<br />
end<br />
position = position + jumplength;<br />
%store to disk, if next 250 positions are reached (performance reasons)<br />
if position >= saveposition;<br />
dlmwrite(strcat(path, filename, '- Interpolated.txt'),ID,<br />
'delimiter', ';', 'newline', 'pc', 'precision', '%.12f', '-append');<br />
ID = [];<br />
saveposition = saveposition + 250;<br />
end<br />
end<br />
%Save the rest<br />
dlmwrite(strcat(path, filename, '- Interpolated.txt'),ID, 'delimiter', ';',<br />
'newline', 'pc', 'precision', '%.12f', '-append');<br />
disp(strcat('End of Computation:_', datestr(now)));<br />
%Import file back from disk<br />
interpolation = importdata(strcat(path, filename, '- Interpolated.txt'));<br />
%Show Summary of the imported data<br />
%Count Dooropenings in Original File<br />
dooropenings = 0;<br />
for i = 1:length(import.data);<br />
if ~isnan(import.data(i,6));<br />
dooropenings = dooropenings + import.data(i,6);<br />
end<br />
end<br />
disp(strcat('Dooropenings (Original File):_', int2str(dooropenings)));<br />
disp(strcat('Dooropenings (Interpolated File):_',<br />
int2str(sum(interpolation(:,3)))));<br />
disp(strcat('Dataset Starting Time:_', datestr(interpolation(1,1))));<br />
disp(strcat('Dataset Ending Time:_',<br />
datestr(interpolation(length(interpolation),1))));<br />
A-114