search for: ieq1

Hi, I am using package deSolve to run some ordinary differential equations (ODE) as part of a mathematical modeling project. I have solved for the following equilibrium states: Seq1<-a*(1-Neq1)/(f*Veq1+m+d) Ceq1<-(f*Seq1*Veq1+g*Ieq1+r*(1-Neq1)-b1*Veq1*Ieq1)/(b2+m+d+g) Ieq1<-(-b2*Ceq1)-r*(1-Neq1)/(b1*Veq1-g-u) Veq1<-o*(Ceq1+Ieq1)/e I want to take the differential of both sides of the equation and then solve for the inverse of the first as follows (the parameter values are made up): library(deSolve) rkMethod("rk45dp7...