Result_Evaluation_for_TID2008.m

%%
sc = tid20081(:,1);
mos = tid20081(:,2);
figure(1)
scatter(sc, mos, 'k');
axis([0 9 0 9]);
srcc=num2str(corr(sc, mos, 'type', 'Spearman'));
plcc=num2str(corr(sc, mos, 'type', 'Pearson'));
title(['误差对比 srcc= ' srcc]);
xlabel('客观评分');
ylabel('MOS');
legend('失真图像');
hold on 

%%
%score = GPRredict(data(:,1:14));
%figure(1)
%scatter(score, mos, 'k');
%axis([0 9 0 9]);
%srcc=num2str(corr(score, mos, 'type', 'Spearman'));
%plcc=num2str(corr(score, mos, 'type', 'Pearson'));
%title(['误差对比 srcc= ' srcc]);
%xlabel('客观评分');
%ylabel('MOS');
%legend('失真图像');
%hold on