

%les inn vaare data
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);

gjsnitt=nanmean(StudData2014)
median=nanmedian(StudData2014)
typetal=mode(StudData2014)

stdav=nanstd(StudData2014)
iqrstud=iqr(StudData2014)

%Finn gj.snitt for menn
fM=find(kjonn==1);
mean(hogde(fM))

[H, AX] = plotmatrix(StudData2014);

%Namn paa aksane

xlabel(AX(7,1),'{Hogde (cm)}')
xlabel(AX(7,2),'{Hogde mor}')
xlabel(AX(7,3),'{Hogde far}')
xlabel(AX(7,4),'{Kjonn}')
xlabel(AX(7,5),'{Haar farge}')
xlabel(AX(7,6),'{Auge farge}')
xlabel(AX(7,7),'{Matlab}')


ylabel(AX(7,1),'{Hogde (cm)}')
ylabel(AX(7,2),'{Hogde mor}')
ylabel(AX(7,3),'{Hogde far}')
ylabel(AX(7,4),'{Kjonn}')
ylabel(AX(7,5),'{Haar farge}')
ylabel(AX(7,6),'{Auge farge}')
ylabel(AX(7,7),'{Matlab}')



%Finn gj.snitt for menn
fM=find(kjonn==1);
mean(hogde(fM))




%The event A: brown hair
fbruntHar=find(har==2);
antbruntHar= length(fbruntHar)

%The event B: brown eyes
fbruneAuge=find(auge==2);
antbruneAuge=length(fbruneAuge)

% A \cap B, brown eys and brown hair
fbrunebrune=find(auge==2 & har==2);
antbrunbrun=length(fbrunebrune)

%Pr(A \cup B)
pr=(antbruntHar+antbruneAuge-antbrunbrun)/length(har)

%Antall brune og brunt og kvinne
brunbrunkvinne=find(kjonn==2 & auge==2 & har==2);
antbrunbrunkvinne=length(brunbrunkvinne)
