%% Import data from spreadsheet
% Script for importing data from the following spreadsheet:
%
%    Workbook: /Studium/Master/Master Darmstadt/2.Semester/IFP Self-Healing/Versuche/Ergebnisse/90 °C/80 PMMA 20 TPU- 90.xlsx
%    Worksheet: Matlab
%
% To extend the code for use with different selected data or a different
% spreadsheet, generate a function instead of a script.

% Auto-generated by MATLAB on 2019/07/31 13:31:01

%% Import the data
[~, ~, raw] = xlsread('/Studium/Master/Master Darmstadt/2.Semester/IFP Self-Healing/Versuche/Ergebnisse/90 °C/80 PMMA 20 TPU- 90.xlsx','Matlab');
raw = raw(1:500,14:15);

%% Create output variable
data = reshape([raw{:}],size(raw));

%% Create table
PMMA20TPU90S5 = table;

%% Allocate imported array to column variable names
x1aa = data(:,1);
y1aa = data(:,2);

%% Integration mittels Trapez

% Intervall 1 

x1aa_trap1 = data(119:154,1);
y1aa_trap1 = data(119:154,2);

T1 = trapz (x1aa_trap1, y1aa_trap1);

figure (1);
plot (x1aa_trap1,y1aa_trap1,'o'); grid on;
xlabel('Distance (mm)'); ylabel('Surfaceprofile (µm)');


% Intervall 2 
x1aa_trap2 = data(154:179,1);
y1aa_trap2 = data(154:179,2);

T2 = trapz (x1aa_trap2, y1aa_trap2);

figure (2);
plot (x1aa_trap2,y1aa_trap2,'o'); grid on;
xlabel('Distance (mm)'); ylabel('Surfaceprofile (µm)');


% Intervall 3 [0.2303, 0.4514]
x1aa_trap3 = data(179:215,1);
y1aa_trap3 = data(179:215,2);

T3 = trapz (x1aa_trap3, y1aa_trap3);

figure (3);
plot (x1aa_trap3,y1aa_trap3,'o'); grid on;
xlabel('Distance (mm)'); ylabel('Surfaceprofile (µm)');


% Gesamtintervall

x1aa_trapg = data(119:215,1);
y1aa_trapg = data(119:215,2);

figure (4);
plot (x1aa_trapg,y1aa_trapg,'o'); grid on;
xlabel('Distance (mm)'); ylabel('Surfaceprofile (µm)');

Tk = T1 + T3 + T2*-1;