%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%【程序1】.求称量精度、稀释精度和仪器精度
%[r,p]=corrcoef(x); %x为称量平行样/稀释平行样/机试平行样的原始光谱数据矩阵
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%【程序2】.求相同溶剂不同样品间的相关系数
%[r,p]=corrcoef(x); %x为三个待测样品的平均光谱数据矩阵
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%【程序3】.求相同样品不同溶剂间的相关系数
%[r,p]=corrcoef(x); %x为四种溶剂的平均光谱数据矩阵
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%【程序4】.画图1 (相同样品在不同溶剂中的光谱差异性比较)
%x; %波长序列
%y11; %蒸馏水(277)
%y21; %无水乙醇(277)
%y31; %氯仿(277)
%y41; %石油醚(277)
%y12; %蒸馏水(279)
%y22; %无水乙醇(279)
%y32; %氯仿(279)
%y42; %石油醚(279)
%y13; %蒸馏水(281)
%y23; %无水乙醇(281)
%y33; %氯仿(281)
%y43; %石油醚(281)
%subplot(1,3,1);
%plot(x,y11,'r-',x,y21,'b-',x,y31,'g-',x,y41,'k-');
%title('样品277');
%xlabel('波长(nm)');
%ylabel('吸光度');
%subplot(1,3,2);
%plot(x,y12,'r-',x,y22,'b-',x,y32,'g-',x,y42,'k-');
%title('样品279');
%xlabel('波长(nm)');
%ylabel('吸光度');
%subplot(1,3,3);
%plot(x,y13,'r-',x,y23,'b-',x,y33,'g-',x,y43,'k-');
%title('样品281');
%xlabel('波长(nm)');
%ylabel('吸光度');
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%【程序5】.画图2 (不同样品在相同溶剂中的光谱差异性比较)
%x; %波长序列
%y11; %277(蒸馏水)
%y21; %279(蒸馏水)
%y31; %281(蒸馏水)
%y12; %277(无水乙醇)
%y22; %279(无水乙醇)
%y32; %281(无水乙醇)
%y13; %277(氯仿)
%y23; %279(氯仿)
%y33; %281(氯仿)
%y14; %277(石油醚)
%y24; %279(石油醚)
%y34; %281(石油醚)
%subplot(1,4,1);
%plot(x,y11,'r-',x,y21,'b-',x,y31,'k-');
%title('蒸馏水');
%xlabel('波长(nm)');
%ylabel('吸光度');
%subplot(1,4,2);
%plot(x,y12,'r-',x,y22,'b-',x,y32,'k-');
%title('无水乙醇');
%xlabel('波长(nm)');
%ylabel('吸光度');
%subplot(1,4,3);
%plot(x,y13,'r-',x,y23,'b-',x,y33,'k-');
%title('氯仿');
%xlabel('波长(nm)');
%ylabel('吸光度');
%subplot(1,4,4);
%plot(x,y14,'r-',x,y24,'b-',x,y34,'k-');
%title('石油醚');
%xlabel('波长(nm)');
%ylabel('吸光度');
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%