免安装版本的matlab不能运

function [x,y,hh]=change_step_RK(fun,x0,xn,y0,h)global x; AbsTol=0.0001; xt=x0:h:xn; m=length(xt); x=xt;y=zeros(m,1);hh=h*ones(m,1); y(1)=y0; x y hh for n=1:m-1 [x1,y1]=RK_f(fun,x0,x(n+1),y0,hh(n+1)) [x2,y2]=RK_f(fun,x0,x(n+1),y0,hh(n+1)/2)while abs(y1-y2)>AbsTol; x1=x2;y1=y2;hh(n+1)=hh(n+1)/2;[x2,y2]=RK_f(fun,x0,x(n+1),y0,hh(n+1)/2);end x(n+1)=x2; y(n+1)=y2; end

function [xa,ya]=RK_f(fun,x0,xn,y0,h) xt=x0:h:xn; m=length(xt); x=zeros(m,1);y=zeros(m,1); x(1)=x0; y(1)=y0; n=1; y(1)=y0; for n=1:length(xt)-1 k1=feval(fun,x(n),y(n)); k2=feval(fun,x(n)+h/2,y(n)+h/2*k1); k3=feval(fun,x(n)+h/2,y(n)+h/2*k2); k4=feval(fun,x(n+1)+h,y(n)+h*k3); x(n+1)=x(n)+h; y(n+1)=y(n)+h*(k1+2*k2+2*k3+k4)/6; end xa=x(m); ya=y(m);

format long;
fun=inline(‘’);
[x,y,hh]=change_step_RK(fun,x0,x(n+1),y0,h);
[x,y,hh]

老师要求要用免安装版本，那就不能用inline 求助怎么改代码啊