逼近函数

yaoyuan4102

function f = Legendre(y,k,x0)
' P+ _$ V7 c! o' w! u9 nsyms t;
P(1:k+1) = t;
P(1) = 1;
P(2) = t;
+ a/ E4 A' ]  w) K4 [5 O5 Dc(1:k+1) = 0.0;
c(1)=int(subs(y,findsym(sym(y)),sym('t'))*P(1),t,-1,1)/2;
5 @4 K3 h$ ]9 n$ d" \c(2)=int(subs(y,findsym(sym(y)),sym('t'))*P(2),t,-1,1)/2;
5 o+ k4 ^: {% C! X+ hf = c(1)+c(2)*t;
for i=3:k+1
" g. p+ D1 V+ y& s; M# J    P(i) = ((2*i-3)*P(i-1)*t-(i-2)*P(i-2))/(i-1);
$ n" r0 }5 V5 O& ]7 @4 w    c(i) = int(subs(y,findsym(sym(y)),t)*P(i),t,-1,1)/2;
4 c' _: H6 N  I1 C+ g$ h. Y3 r    f = f + c(i)*P(i);
   
    if(i==k+1)
        if(nargin == 3)
            f = subs(f,'t',x0);
        else
            f = vpa(f,6);
        end
    end
end

Kadyniost

？？？？？

coolistone

顶顶顶顶顶顶顶顶顶顶顶顶的

hjl19890710

lihan厉害厉害厉害厉害厉害

hjl19890710

好 dwadedcsargtg

昝斌

这是什么哦？

zqyzixin

呵呵，非常感谢，很好很强大