%*****************************************************************************************************

close all
clear;
k3 = 0.1; %select possible fraction of outliers
k2 = 0.2; %select % mg/dL threshold value for residuals

load('spe_d1r0c0s0122bDCn2'); %,'x1dc06101720n','x1dc20n','x1dc17n','x1dc14n','x1dc10n','x1dc06n');
load('sgl_y2b2') %'y106101720','y120','y117','y114','y110','y106');

%Select one group for processing at a time
%Group=1; xind=x1dc06n; yind=y206; xo=x1dc10141720n; yo=y210141720; 
%Group=2; xind=x1dc10n; yind=y210; xo=x1dc06141720n; yo=y206141720;
%Group=3; xind=x1dc14n; yind=y214; xo=x1dc06101720n; yo=y206101720; 
%Group=4; xind=x1dc17n; yind=y217; xo=x1dc06101420n; yo=y206101420; 
Group=5; xind=x1dc17n; yind=y220; xo=x1dc06101417n; yo=y206101417; 
