clear; clc

[Time1, Extension1, Load1] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_6_cord1_bowline.csv");
Extension1 = Extension1 - min(Extension1);
[Time2, Extension2, Load2] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_5_cord2_bowline.csv");
Extension2 = Extension2 - min(Extension2);
[Time3, Extension3, Load3] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_2_cord3_insertion.csv");
Extension3 = Extension3 - min(Extension3);
[Time4, Extension4, Load4] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_1_cord4_insertion.csv");
Extension4 = Extension4 - min(Extension4);
[Time5, Extension5, Load5] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_3_cord5_figure8.csv");
Extension5 = Extension5 - min(Extension5);
[Time6, Extension6, Load6] = importtensiledata("D:\Parachute_Cord_tensile\Specimen_RawData_4_cord6_figure8.csv");
Extension6 = Extension6 - min(Extension6);

tiledlayout(1,6)
nexttile
plot(Extension1, Load1)
title('Specimen 1: Bowline knot')
ylim([-100,4600])
xlabel('Extension (mm)')
ylabel('Load (N)')

nexttile
plot(Extension2, Load2)
title('Specimen 2: Bowline knot')
ylim([-100,4600])
xlabel('Extension (mm)')

nexttile
plot(Extension3, Load3)
title('Specimen 3: Insertion joint')
ylim([-100,4600])
xlabel('Extension (mm)')

nexttile
plot(Extension4, Load4)
title('Specimen 4: Insertion joint')
ylim([-100,4600])
xlabel('Extension (mm)')

nexttile
plot(Extension5, Load5)
title('Specimen 5: Figure-8 knot')
ylim([-100,4600])
xlabel('Extension (mm)')

nexttile
plot(Extension6, Load6)
title('Specimen 6: Figure-8 knot')
ylim([-100,4600])
xlabel('Extension (mm)')

% legend('Specimen 1: Bowline knot','Specimen 2: Bowline knot','Specimen 3: Insertion joint', ...
%     'Specimen 4: Insertion joint','Specimen 5: Figure-8 knot','Specimen 6: Figure-8 knot')