data_modelling_p_1

weight = load('3_weight.txt');
height = load('3_height.txt');
age = load('3_age.txt');
square = load('3_square.txt');
speed_out = load('3_speed_out.txt');
speed_city = load('3_speed_city.txt');

speed_cityWithoutCorr = speed_city;
speed_outWithoutCorr = speed_out;

%weight_mean = mean(weight);
%height_mean = mean(height);
%age_mean = mean(age)
%square_mean = mean(square);
%speed_out_mean = mean(speed_out)
%speed_city_mean = mean(speed_city)

weight_var = var(weight)
height_var = var(height)
age_var = var(age)
speed_city_var = var(speed_city)
speed_out_var = var(speed_out)
boxplot(weight)
weight(50) = [];
height(52) = [];
age(19) = [];
speed_out(8) = [];
speed_city(19) = [];

weight_varW = var(weight)
height_varW = var(height)
age_varW = var(age)
speed_city_varW = var(speed_city)
speed_out_varW = var(speed_out)

plot(speed_city, 'red')
hold on
plot(speed_out, 'blue')

%[a,b] = corrcoef(speed_outWithoutCorr, speed_cityWithoutCorr)
[a] = corrcoef(speed_city, speed_out)