%
% Problem Epage 201/202
% 
% Written by:
% -- 
% John L. Weatherwax                2008-02-20
% 
% email: wax@alum.mit.edu
% 
% Please send comments and especially bug reports to the
% above email address.
% 
%-----

clear all; 
close all; 
clc; 

addpath('../../Code/CSTool');
load thrombos;   % <- two columns diabetic/normal

data = [diabetic,normal];

figure; boxplot(data); 
set(gca,'XTickLabel',{'diabetic','normal'});
xlabel('patient type'); ylabel('feature value'); 
title( 'box plot for thrombos data' );
saveas( gcf, 'bp_thrombos', 'epsc' );