``` {r, include = FALSE} knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
require(linpk)
# linpk [![R-CMD-check](https://github.com/benjaminrich/linpk/workflows/R-CMD-check/badge.svg)](https://github.com/benjaminrich/linpk/actions){.linpk-devel} [![CRAN\_Release\_Badge](http://www.r-pkg.org/badges/version-ago/linpk)](https://CRAN.R-project.org/package=linpk) [![CRAN\_Download\_Badge](http://cranlogs.r-pkg.org/badges/linpk)](https://CRAN.R-project.org/package=linpk) An R package for generating concentration-time profiles from linear pharmacokinetic (PK) systems. ## Installation To install from CRAN: ``` r install.packages("linpk")
To install the latest development version directly from GitHub:
require(devtools) devtools::install_github("benjaminrich/linpk")
To simulate a PK profile from a one-compartment model with first-order absorption under repeated dosing:
t.obs <- seq(0, 6*24, 0.5) y <- pkprofile(t.obs, cl=0.5, vc=11, ka=1.3, dose=list(amt=100, addl=9, ii=12)) plot(y)
For a more detailed introduction to the package, see the vignette.
There is a companion shiny app that provides a demo of the package capabilities, and also generates code that can be placed in an R script. It can be accessed at https://benjaminrich.shinyapps.io/linpk-demo-app/ or run locally by pasting the following lines in an R console:
# Make sure the required packages are installed (if not, install them) sapply(c("shiny", "shinyjs", "shinyAce", "dygraphs", "linpk"), requireNamespace) linpk::linpkApp()
The app will open in a browser, and looks like this:
{width=100%}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.