逼近函数

yaoyuan4102

function f = Legendre(y,k,x0)
syms t;
P(1:k+1) = t;
P(1) = 1;
P(2) = t;
6 J5 |  \1 b, E" Zc(1:k+1) = 0.0;
- V8 w( O& n( [c(1)=int(subs(y,findsym(sym(y)),sym('t'))*P(1),t,-1,1)/2;
8 S' j0 m' K* E5 w7 z6 uc(2)=int(subs(y,findsym(sym(y)),sym('t'))*P(2),t,-1,1)/2;
f = c(1)+c(2)*t;
for i=3:k+1
    P(i) = ((2*i-3)*P(i-1)*t-(i-2)*P(i-2))/(i-1);
    c(i) = int(subs(y,findsym(sym(y)),t)*P(i),t,-1,1)/2;
    f = f + c(i)*P(i);
   
    if(i==k+1)
        if(nargin == 3)
9 a) {/ X" ~- l( V9 |            f = subs(f,'t',x0);
/ q2 U$ s# L+ e' \( t/ b        else
% a: M3 T# T9 p4 C* z5 o            f = vpa(f,6);
        end
    end
end

zqyzixin

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

昝斌

这是什么哦？

hjl19890710

好 dwadedcsargtg

hjl19890710

lihan厉害厉害厉害厉害厉害

coolistone

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

Kadyniost

？？？？？