# NOT RUN {
myModel1 <- inlineModel("
[LONGITUDINAL]
EQUATION:
f = 10*exp(-0.2*t)
")
print(myModel1)
r <- simulx(model=myModel1, output=list(name="f", time=0:100))
myModel2 <- inlineModel("
[LONGITUDINAL]
EQUATION:
f = 10*exp(-0.2*t)
", filename="random")
print(myModel2)
# }
Run the code above in your browser using DataLab