load('../Data/StudData2014.txt')

hogde=StudData2014(:,1);
hogdeMor=StudData2014(:,2);
hogdeFar=StudData2014(:,3);
kjonn=StudData2014(:,4);
har=StudData2014(:,5);
auge=StudData2014(:,6);
Matlab=StudData2014(:,7);


%Finn indeks til dei med oppgitt h?gde p? b?de mor og far
f=find(1-isnan(hogdeFar) & (1-isnan(hogdeMor)));

hfar=hogdeFar(f);
hmor=hogdeMor(f);


figure
subplot(1,2,1)
hist(hfar)
title('H?gde fedre')
subplot(1,2,2)
hist(hmor)
title('H?gde m?dre')

figure
plot(hfar,hmor,'x')
xlabel('H?gde far')
ylabel('H?gde mor')

mean(hfar)
mean(hmor)

var(hfar)
var(hmor)

std(hfar)
std(hmor)

%Kovarians og korrelasjon hogde mor og hogde far
cov(hfar,hmor)
corr(hfar, hmor)

%Ser p? m?dre og dotre
figure
plot(hogdeMor(kjonn==2), hogde(kjonn==2),'x')
xlabel('H?gde mor')
ylabel('H?gde datter')
%Korrelasjon hogde mor og hogde datter
corr(hogdeMor(kjonn==2), hogde(kjonn==2),'rows','pairwise')


%Triller Nsample terningar og tar gjennomsnittet
Nsample=10;
sample=randi(6,[Nsample,1]);
mean(sample)

%P? ei linje
mean(randi(6,[Nsample,1]))

