How to prepare a vector for the "dose" argument in NonCompart R package

dose-argument-NonCompart.R

# devtools::install_github("dpastoor/PKPDdatasets")
library(NonCompart)
library(PKPDdatasets)
library(dplyr)

head(PKPDdatasets::sd_iv_rich_pkpd) # One-compartment single IV bolus PKPD

sd_iv_rich_pkpd_dose <- PKPDdatasets::sd_iv_rich_pkpd %>% 
  select(ID, DOSE) %>% 
  distinct() %>% 
  .$DOSE

sd_iv_rich_pkpd_dose # 60 patients of 3 dose levels of 1, 10, 100 mg

tblNCA(PKPDdatasets::sd_iv_rich_pkpd,
       key = "ID",
       colTime = "TIME",
       colConc = "COBS", 
       dose = sd_iv_rich_pkpd_dose)