Description Usage Arguments Value Examples
This function allows users to simulate the model (i.e., solve ODEs) using a differential equation solver based on a combination of backward differentiation formula and a direct linear system solution method (using the "daspk" function from the deSolve package).
1 | simulateModel(x, times = seq(0, 10, by = 0.1))
|
x |
model name (required) |
times |
time points in which model will be simulated |
Data frame where each row corresponds to a time point in which model was simulated. First column corresponds to time, while the rest of columns correspond to model species, i.e., values assigned to those species at a given time point.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | exmp <- newModel("This is an example of a new model")
addMAreaction(exmp, react="A = null", "rf", "rb")
addMAreaction(exmp, react="A + B -> 2*AB", "k", name="Forward AB")
addMAreaction(exmp, react="AB -> null", "rAB")
addMAreactRate(exmp, "rf", "fixed", "1")
addMAreactRate(exmp, "rb", "fixed", "0.75")
addMAreactRate(exmp, "k", "fixed", "0.5")
addMAreactRate(exmp, "rAB", "assigned", "p1*A")
addParameters(exmp, "p1", 0.75)
addSpecies(exmp, "A", 10)
addSpecies(exmp, "B", 10)
addSpecies(exmp, "AB", 0)
addRule(exmp, "rule B", "ODEs", "B=-0.1*AB")
makeModel(exmp)
simResults <-simulateModel(exmp)
plotResults(simResults, title="Simulation results")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.