idm soferi experianta

n = rows(soferi);
gen = soferi(1:n,1);
varsta = soferi (:,2);
acc = soferi (1:n, 3);
experienta = soferi (:, 4);
#hist(acc, 7, "facecolor",'r');     #7-nr segmente
#grid;
nb=0; nf=0;
#facem 2 hist nr acced provocate de barbati resp femei
for i=1:n
  if(gen(i)==1)
  nb++;
  barbati(nb)=acc(i);  #adaug in vector si creste si nr de barbati
else
  nf++;
  femei(nf)=acc(i);
  endif
endfor
subplot(1,2,1);
hist(barbati,'facecolor','b');
grid;
subplot(1,2,2);
hist(femei, 'facecolor','m');
grid;
# hist care evidentiazaa experienta soferilor in functie de gen
# pkg load statistics