diff options
| -rw-r--r-- | Kod/bilbana/privete/LaptimeTest.m | 63 | ||||
| -rw-r--r-- | Kod/bilbana/privete/Test3.m | 34 |
2 files changed, 63 insertions, 34 deletions
diff --git a/Kod/bilbana/privete/LaptimeTest.m b/Kod/bilbana/privete/LaptimeTest.m new file mode 100644 index 0000000..0cf1422 --- /dev/null +++ b/Kod/bilbana/privete/LaptimeTest.m @@ -0,0 +1,63 @@ +%{ +GRAPHS: Efter avslutad körning skall plottar som sammanfattar körningen +visas på styrdatorns skärm. Nödvändiga plottar är: +• En graf som visar varv och varvtider där referenstiden och +maximalt tillåtna avvikelser är utmärkta. Figuren skall också inkludera en +text som anger standardavvikelsen. +• Gaspådrag mot tid/hastighet för varje segment. +%} +disp('Startar test av grafer') +%% IN +ref_lap_time = 14; +track = 1; +%% Figur +figure(1); +clf; +subplot(10,1,1:9); +%% Raka streck +ref_lap_time_vector = ref_lap_time*ones(1,length(car1.lap_times)); + +Min_c = ref_lap_time-0.5; +Max_c = ref_lap_time+0.5; +InD_c = ref_lap_time-1; +InU_c = ref_lap_time+1; + +Min = Min_c*ones(1,length(car1.lap_times)); +Max = Max_c*ones(1,length(car1.lap_times)); +InU = InU_c*ones(1,length(car1.lap_times)); +InD = InD_c*ones(1,length(car1.lap_times)); +%% Varvtider +disp(car1.lap_times); +disp(ref_lap_time_vector); +plot1 = stairs(car1.lap_times); +plot1.Marker = 'o'; +plot1.MarkerFaceColor = 'k'; +plot1.LineStyle = 'none'; +hold on +%% Referenstid +plot2 = stairs(ref_lap_time_vector); +plot2.LineWidth = 2; +plot2.Color = 'k'; +%% Tillåten avvikelse +plotMax = stairs(Max); +plotMin = stairs(Min); +plotMax.Color = 'k'; +plotMin.Color = 'k'; +%% Osynliga hjälpstreck +plotInU = stairs(InU); +plotInD = stairs(InD); +plotInU.LineStyle = 'none'; +plotInD.LineStyle = 'none'; + +hold off +%% Standardavvkielse +sigma = std(car1.lap_times); +sigma = round(sigma, 2); +sig_str = string(sigma); +%% Text +xlabel('Varv'); +ylabel('Tid [s]'); +title('Varvtider'); %Todo vilken bana? +txt = join(['Standardavvikelse:',sig_str, 's']); +annotation('textbox',[.1 0.05 .4 .05],'String',txt,'EdgeColor','none') +disp(sig_str);
\ No newline at end of file diff --git a/Kod/bilbana/privete/Test3.m b/Kod/bilbana/privete/Test3.m deleted file mode 100644 index 5527f2a..0000000 --- a/Kod/bilbana/privete/Test3.m +++ /dev/null @@ -1,34 +0,0 @@ -%{ -GRAPHS: Efter avslutad körning skall plottar som sammanfattar körningen -visas på styrdatorns skärm. Nödvändiga plottar är: -• En graf som visar varv och varvtider där referenstiden och -maximalt tillåtna avvikelser är utmärkta. Figuren skall också inkludera en -text som anger standardavvikelsen. -• Gaspådrag mot tid/hastighet för varje segment. -%} -disp('Startar test av grafer') -%% IN -ref_lap_time = 13; -%% Bana 1 -figure(1); -%% Varvtid -ref_lap_time_vector = ref_lap_time*ones(1,length(car1.lap_times)); - -subplot(1,1,1); -disp(car1.lap_times); -disp(ref_lap_time_vector); -plot1 = stairs(car1.lap_times); -plot1(1).Marker = 'o'; -plot1(1).MarkerFaceColor = 'k'; -plot1(1).LineStyle = 'none'; -hold on -plot2 = stairs(ref_lap_time_vector); -plot2(1).LineWidth = 2; -plot2(1).Color = 'k'; -hold off - - - -xlabel('Varv'); -ylabel('Tid [s]'); -title('Varvtider');
\ No newline at end of file |
