%% Clear Workspace and Close figures
clear; close all; clc;

%% Intialize Laplace variable
s = zpk('s');

%% Path for functions, data and scripts
addpath('./mat/'); % Path for data

%% Colors for the figures
colors = colororder;

% Measurement Results
% # - Strange shape: 5

% The expected flexible beam thickness is $250\,\mu m$.
% However, it is more important that the thickness of all beams are close to each other.

% The dimension of the beams are been measured at each end to be able to estimate the mean of the beam thickness.

% All the measured dimensions are summarized in Table ref:tab:test_joints_flex_dim.


meas_flex = [[223, 226, 224, 214];
             [229, 231, 237, 224];
             [234, 230, 239, 231];
             [233, 227, 229, 232];
             [225, 212, 228, 228];
             [220, 221, 224, 220];
             [206, 207, 228, 226];
             [230, 224, 224, 223];
             [223, 231, 228, 233];
             [228, 230, 235, 231];
             [197, 207, 211, 204];
             [227, 226, 225, 226];
             [215, 228, 231, 220];
             [216, 224, 224, 221];
             [209, 214, 220, 221];
             [213, 210, 230, 229]];



% #+name: tab:test_joints_flex_dim
% #+caption: Measured Dimensions of the flexible beams in $\mu m$
% #+attr_latex: :environment tabularx :width 0.4\linewidth :align Xcccc
% #+attr_latex: :center t :booktabs t :float t
% #+RESULTS:
% |    |  Y1 |  Y2 |  X1 |  X2 |
% |----+-----+-----+-----+-----|
% |  1 | 223 | 226 | 224 | 214 |
% |  2 | 229 | 231 | 237 | 224 |
% |  3 | 234 | 230 | 239 | 231 |
% |  4 | 233 | 227 | 229 | 232 |
% |  5 | 225 | 212 | 228 | 228 |
% |  6 | 220 | 221 | 224 | 220 |
% |  7 | 206 | 207 | 228 | 226 |
% |  8 | 230 | 224 | 224 | 223 |
% |  9 | 223 | 231 | 228 | 233 |
% | 10 | 228 | 230 | 235 | 231 |
% | 11 | 197 | 207 | 211 | 204 |
% | 12 | 227 | 226 | 225 | 226 |
% | 13 | 215 | 228 | 231 | 220 |
% | 14 | 216 | 224 | 224 | 221 |
% | 15 | 209 | 214 | 220 | 221 |
% | 16 | 213 | 210 | 230 | 229 |

% An histogram of these measured dimensions is shown in Figure ref:fig:test_joints_size_hist.


figure;
histogram([(meas_flex(:,1)+meas_flex(:,2))/2,(meas_flex(:,3)+meas_flex(:,4))/2], 7)
xlabel("Beam's Thickness [$\mu m$]");

%% Save beam sizes
save('./mat/flex_meas_dim.mat', 'meas_flex');