📄 kriging.m
字号:
function z0 = kriging(x,y,z,xi,yi)%KRIGING Summary of this function goes here% Detailed explanation goes here% STEP 1 Coefficient determination% calculate the Distance among known pointsfor ii=1:length(x) r(ii,:)=sqrt((x-x(ii)).*(x-x(ii))+(y-y(ii)).*(y-y(ii))); end% calculate the Kriging Matrix% form the Kriging Matrix AAbb=zeros(length(x),1)+1;AA=[r,bb];bb=[bb',0];AA=[AA;bb];% known measurement array zz=[z;0];% coeffieicnt calculation kesekese=inv(AA)*z;% STEP 2 Estimation based on known measurement[kk,ii]=size(xi);[jj,kk]=size(yi);z0(ii,jj)=0;for iter_i=1:ii; for iter_j=1:jj; xxi=xi(1,iter_i);yyi=yi(iter_j,1); rij=sqrt((x-xxi).*(x-xxi)+(y-yyi).*(y-yyi)); rrij=[rij;1]; z0(iter_i,iter_j)=rrij'*kese; endendend
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -