Nothing
tests/testthat/test_read_model_json.R
In PKPDsim: Tools for Performing Pharmacokinetic-Pharmacodynamic Simulations
test_that("read_model_json can read JSON and escape characters", {
dat <- read_model_json(test_path("sample_json", "test_1cmt_iv.json5"))
expect_equal(dat$equations, "\n\nfrac{dA_1}{dt} = -(CL/V) \n\ncdot A_1")
expect_equal(dat$ode_code, "\n dAdt[0] = -(CL/V)*A[0];")
})
Try the PKPDsim package in your browser
Any scripts or data that you put into this service are public.
PKPDsim documentation built on March 7, 2023, 5:40 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("read_model_json can read JSON and escape characters", {
dat <- read_model_json(test_path("sample_json", "test_1cmt_iv.json5"))
expect_equal(dat$equations, "\n\nfrac{dA_1}{dt} = -(CL/V) \n\ncdot A_1")
expect_equal(dat$ode_code, "\n dAdt[0] = -(CL/V)*A[0];")
})
Try the PKPDsim package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.