function [R,k,b] = msc(A)
% 多元散射校正
% 输入待处理矩阵，通过多元散射校正，求得校正后的矩阵
%% 获得矩阵行列数
[m,n] = size(A);
%% 求平均光谱
M = mean(A,2);
%% 利用最小二乘法求每一列的斜率k和截距b
for i = 1:n
a = polyfit(M,A(:,i),1);
if i == 1
k = a(1);
b = a(2);
else
k = [k,a(1)];
b = [b,a(2)];
end
end
%% 求得结果
for i = 1:n
Ai = (A(:,i)-b(i))/k(i);
if i == 1
R = Ai;
else
R = [R,Ai];
end
end
资源简介：function [R,k,b] = msc(A) % 多元散射校正 % 输入待处理矩阵，通过多元散射校正，求得校正后的矩阵 %% 获得矩阵行列数 [m,n] = size(A); %% 求平均光谱 M = mean(A,2); %% 利用最小二乘法求每一列的斜率k和截距b for i = 1:n a = polyfit(M,A(...
上传时间： 2020-03-12
上传用户：15275387185
资源简介：多元散射校正算法，用于近红外散射数据处理，增强信噪比
上传时间： 2017-06-05
上传用户：13517191407
资源简介：此程序是matlab中有关平滑去噪中常用的散射校正的程序，简单使用，其中的注释详细，对每个变量的注释都很清楚
上传时间： 2013-12-03
上传用户：450976175
资源简介：弹簧挂锁设计--MSC.ADAMS View使用入门练习
上传时间： 2013-06-18
上传用户：eeworm
资源简介：AEM新型叠层多元陶瓷片式熔断器应用指南
上传时间： 2013-07-11
上传用户：eeworm
资源简介：采用UC3854的有源功率因数校正电路工作原理与应用
上传时间： 2013-04-15
上传用户：eeworm
资源简介：MSC-51使用手册
上传时间： 2013-07-30
上传用户：eeworm
资源简介：GB-T4677.8-1984 印制板镀涂覆盖厚度测试方法 β反向散射法
上传时间： 2013-04-15
上传用户：eeworm
资源简介：专辑类----元器件样本专辑 AEM新型叠层多元陶瓷片式熔断器应用指南.rar
上传时间： 2013-04-24
上传用户：cy1109
资源简介：专辑类-开关电源相关专辑-119册-749M 采用UC3854的有源功率因数校正电路工作原理与应用.pdf
上传时间： 2013-07-29
上传用户：LouieWu
