% 清空环境变量 clc clear % %% %读取数据 %load data output input load datacal load dataval
%测定集合和验证集合数据 %训练数据和预测数据 [mcal,ncal]=size(inputcal); [mval,nval]=size(inputval); %rmsetotalre=0; rmsectotal=0; rmseptotal=0; rpdtotal=0; rmseaver=0; %%RMSEC for i=1:mcal
rmsectotal=(inputcal(i,1)-inputcal(i,2))*(inputcal(i,1)-inputcal(i,2))+rmsectotal; 讯享网
% rmsetotalre=rmsectotal+rmsetotalre;
讯享网%rmsetotalre=rmsectotal+rmsetotalre;
end RMSEC=sqrt(rmsectotal/mcal); %%RMSEP for i=1:mval
rmseptotal=(inputval(i,1)-inputval(i,2))*(inputval(i,1)-inputval(i,2))+rmseptotal; % rmsetotalre=rmsectotal+rmsetotalre;
讯享网%rmsetotalre=rmsectotal+rmsetotalre;
end RMSEP=sqrt(rmseptotal/mval); %%RPD average=0; for i=1:mcal
average=inputcal(i,1)+average; % rmsetotalre=rmsectotal+rmsetotalre;
讯享网%rmsetotalre=rmsectotal+rmsetotalre;
end average=average/mcal; for i=1:mcal
rmseaver=(inputcal(i,1)-average)*(inputcal(i,1)-average)+rmseaver; % rmsetotalre=rmsectotal+rmsetotalre;
讯享网%rmsetotalre=rmsectotal+rmsetotalre;
end rmseaver=sqrt(rmseaver);
for i=1:mval
rpdtotal=(inputval(i,1)-inputval(i,2)-rmseptotal/mcal)*(inputval(i,1)-inputval(i,2)-rmseptotal/mcal)+rpdtotal; % rmsetotalre=rmsectotal+rmsetotalre;
讯享网%rmsetotalre=rmsectotal+rmsetotalre;
end RPD=rmseaver/sqrt(rpdtotal);
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容，请联系我们，一经查实，本站将立刻删除。
如需转载请保留出处：https://51itzy.com/kjqy/184062.html