2 [Visuals_train Boundary1_train Boundary2_train Filenames_train]=read_data('/home/tsix/tsix/high_jump/09sem/gmm/OCT/Lernstichprobe/');
4 [Visuals_test Boundary1_test Boundary2_test Filenames_test]=read_data('/home/tsix/tsix/high_jump/09sem/gmm/OCT/ttt1/');
5 [s1, S1, s2, S2] = get_probabilities(Visuals_train, Boundary1_train,Boundary2_train);
9 %for i=1:length(Visuals_test)
13 f1=extract_features1(Visuals_test{i}, 3);
17 X=get_emission_probabilities(f1, s1,sigma1);
20 fb_mean1=hmm_forward_backward(s1, S1, X,'mean');
24 f2=extract_features2(Visuals_test{i}, fb_mean1,s2,sigma2);
27 s=compose_priors(s2,fb_mean1);
29 X=get_emission_probabilities(f2, s,sigma2);
32 fb_mean2=hmm_forward_backward(s(:,1), S2(1:size(s,1),1:size(s,1)), X,'mean');
36 show_result(Visuals_test{i}, fb_mean1,Boundary1_test{i},fb_mean2,Boundary2_test{i});
39 %show_features(Visuals_test{i},f1,f2);
40 [mse1 bias1 var1 count1 mse2 bias2 var2 count2]=validate(fb_mean1,Boundary1_test{i},fb_mean2,Boundary2_test{i});
41 fprintf('Results for %s:\n',Filenames_test{i});
42 fprintf(' Boundary1:\n');
43 fprintf(' Bias=%f, MSE=%f, var=%f, size of ground truth: %d\n',bias1, mse1, var1, count1);
44 fprintf(' Boundary2:\n');
45 fprintf(' Bias=%f, MSE=%f, var=%f, size of ground truth: %d\n',bias2, mse2, var2, count2);