Engineering, Differential Equations, Science Education, Mathematics Education.
[4; 2]; [t,y]=ode45(@ODEfun,tspan, y0); plot (t,y); xlabel('t'); legend('R','F'); fprintf('R = %16.6f \n',y(length(y),1)); fprintf('F = %16.6f \n',y(length(y),2)); end function dYfuncvecdt = ODEfun(t,Yfuncvec) R = Yfuncvec(1); F = Yfuncvec(2); dRdt = 2*(R - R*F); dFdt = F*R - F; dYfuncvecdt =