Displaying 1 result from an estimated 1 matches for "yd4".
Did you mean:
md4
2004 Jun 14
1
olesolve: stepsize
...- (p["k21"] + p["k01"])*y[1]
yd2 <- p["k21"]*y[1]*p["vg"] - (p["k12"] + p["k02"] +
(1-p["fx"])*y[4])*y[2]
yd3 <- (1-p["f"])*s(t)*p["kg"]*y[1]/p["vi"] - p["ki"]*y[3]
yd4 <- -p["p2"]*y[4] + p["p3"]*(y[3]-ib)
list(c(yd1, yd2, yd3, yd4))
}
__________________________________________________
First is that The computing time for each individual simulation is about 6
sec if I set up time from 0 - 360 min and calculate on each minute....