function E=N85chapt9ex2(a,b,N,ya)
%學號 20042374  姓名 鐘健升   作業號  85
%p264 第2題
%f是微分方程右端表達式
%g是微分方程解的表達式
%a,b是區間[a,b]中的a,b
%N是等分區間的個數
syms x y
f=1-2*x*y/(1+x^2);g=(1/3*x^3+x)/(1+x^2);
h=(b-a)/N;
y=zeros(1,N+1);
x=zeros(1,N+1);
z=zeros(1,N+1);
m=zeros(1,N+1);
y(1)=ya;
z(1)=ya;
m(1)=0;
x=a:h:b;
for i=1:N
    y(i+1)=y(i)+h*(1-2*x(i)*y(i))/(1+x(i)^2);
    z(i+1)=(1/3*x(i)^3+x(i))/(1+x(i)^2);
    m(i+1)=z(i+1)-y(i+1);
end	
E=[x',y',z',m'];
plot(x,y,'r.',x,z,'b*')