M文件合集 matlab算法

好东西啊 M文件 各种算法 各种求下载 求积分

function f = Atken（xyx0）
syms t;
if（length（x） == length（y））
    n = length（x）;    
else
    disp（‘x和y的维数不相等！‘）;
    return;
end                                      %检错

y1（1:n） = t;                             %符号函数数组要赋初值
for（i=1:n-1）   
    for（j=i+1:n）
        y1（j） = y（j）*（t-x（i））/（x（j）-x（i））+y（i）*（t-x（j））/（x（i）-x（j））;    
    end
    y = y1;
    simplify（y1）;
end

if（nargin == 3）
    f = subs（y1（n）‘t‘x0）;            %计算插值点的函数值
else
    simplify（y1（n））;                   %化简
    f = collect（y1（n））;                %将插值多项式展开
    f = vpa（f6）;                      %将插值多项式的系数化成6位精度的小数
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2012-05-08 17:58  m文件\
     目录           0  2012-05-08 17:58  m文件\插值\
     文件       12756  2012-05-08 17:58  m文件\插值.zip
     目录           0  2012-05-04 15:16  m文件\插值M\
     文件         988  2012-05-04 14:37  m文件\插值M\BSample.m
     文件         531  2012-05-04 14:37  m文件\插值M\DCS.m
     文件        1111  2012-05-04 14:36  m文件\插值M\DH.m
     文件         731  2012-05-04 14:36  m文件\插值M\DL.m
     文件        1701  2012-05-04 14:36  m文件\插值M\DTL.m
     文件        2209  2012-05-04 14:36  m文件\插值M\Gauss.m
     文件         661  2012-05-04 14:36  m文件\插值M\Hermite.m
     文件         804  2012-05-04 14:36  m文件\插值M\Language.m
     文件         616  2012-05-04 14:36  m文件\插值M\Neville.m
     文件         734  2012-05-04 14:36  m文件\插值M\Newtonforward.m
     文件         934  2012-05-04 14:36  m文件\插值M\SecSample.m
     文件         844  2012-05-04 14:36  m文件\插值M\SubHermite.m
     文件        1352  2012-05-04 14:36  m文件\插值M\ThrSample1.m
     文件        1466  2012-05-04 14:35  m文件\插值M\ThrSample2.m
     文件        1573  2012-05-04 14:37  m文件\插值M\ThrSample3.m
     文件         681  2006-11-24 22:27  m文件\插值\Atken.m
     文件         988  2008-04-09 18:14  m文件\插值\BSample.m
     文件         531  2006-11-25 00:51  m文件\插值\DCS.m
     文件        1111  2008-04-09 18:17  m文件\插值\DH.m
     文件         731  2008-04-09 18:15  m文件\插值\DL.m
     文件        1701  2008-04-09 18:16  m文件\插值\DTL.m
     文件         476  2008-04-09 18:15  m文件\插值\FCZ.m
     文件        2209  2006-11-24 23:56  m文件\插值\Gauss.m
     文件         661  2006-11-24 10:49  m文件\插值\Hermite.m
     文件         843  2012-04-27 17:12  m文件\插值\IDW.m
     文件         658  2012-05-03 12:31  m文件\插值\kriging1.m
     文件         798  2012-05-02 22:13  m文件\插值\kriging2.m
............此处省略260个文件信息