stoi <- as.data.frame(stringsAsFactors=FALSE, matrix(c(
"bac", "growth", "1",
"bac", "inout", "-bac",
"sub", "growth", "-1 / yield",
"sub", "inout", "(sub_in - sub)"
), ncol=3, byrow=TRUE,
dimnames=list(NULL, c("variable", "process", "expression")))
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.