|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
这是我的m.file:
function R=rk4(f,a,b,ya,N)
% y'=f(x,y)
% a,b左右端点。
% N为迭代步数。
% h为步长。
% ya为初值。
h=(b-a)/N;
T=zeros(1,N+1);
Y=zeros(1,N+1);
T=a:h:b;
Y(1)=ya;
for j=1:N
k1=h*feval(f,T(j),Y(j));
k2=h*feval(f,T(j)+h/2,Y(j)+k1/2);
k3=h*feval(f,T(j)+h/2,Y(j)+k2/2);
k4=h*feval(f,T(j)+h,Y(j)+k3);
Y(j+1)=Y(j)+(k1+2*k2+2*k3+k4)/6;
end
R=[T' Y']
不过运行的时候总是会出错:
>> f='x+y';
>> rk4('f',0,1,1,10)
??? Error using ==> feval
Undefined function or method 'f' for input arguments of type 'double'.
Error in ==> rk4 at 13
k1=h*feval(f,T(j),Y(j));
请各位大哥大姐帮帮小弟吧~~~我们老师也不会改这个错误啊~~~ |
|