地统计学中的克里格插值法，Matlab编写，内有详细的说明.rar

【中科院】地统计学中的克里格插值法，Matlab编写，内有详细的说明.rar

function [Cs]=devico（key）
keybar=mean（key）;
s=0;
for i=1:length（key）
    s=s+（key（i）-keybar）^3*length（find（key==key（i）））;
end
Cs=s/（length（key）*std（key）^3*keybar）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        171  2011-05-15 22:31  devico.m

     文件        805  2011-05-24 21:38  dlpm.m

     文件        366  2011-05-16 16:25  halfrevolution.m

     文件       1020  2011-05-16 16:36  hfr2.m

     文件        853  2011-05-24 21:33  KrigingInter.m

     文件        452  2011-05-20 21:20  xcovariance.m

----------- ---------  ---------- -----  ----

                 3667                    6