Skip to contents

This function provides a summary of the model's parameter estimates and precision.

Usage

tabulate.parameters(object, prompt = FALSE, outfile = NULL, dir = "")

Arguments

object

An xpose.data object.

prompt

Ask before printing.

outfile

file to output to (NULL means screen).

dir

Which directory is the NONMEM output file located. "" means the current working directory getwd().

Value

A table summarizing the parameters and their precision.

Author

Niclas Jonsson, Andrew Hooker & Justin Wilkins

Examples


od = setwd(tempdir()) # move to a temp directory
(cur.files <- dir()) # current files in temp directory
#> [1] "bslib-f00e6fae00d8efe8984ec802f708f91a"
#> [2] "downlit"                               
#> [3] "file17a715324417"                      

simprazExample(overwrite=TRUE) # write files
(new.files <- dir()[!(dir() %in% cur.files)])  # what files are new here?
#> [1] "run1.ext"    "run1.lst"    "run1.mod"    "simpraz.dta" "xptab1"     
xpdb <- xpose.data(1) # read in files to xpose database
#> 
#> Looking for NONMEM table files.
#>     Reading ./xptab1 
#> Table files read.
#> 
#> Looking for NONMEM simulation table files.
#> No simulated table files read.
#> 

tabulate.parameters(xpdb)
#> +---------+-----+-----+
#> |Parameter|Value| RSE |
#> +---------+-----+-----+
#> |    TH1  | 17.7|0.059|
#> +---------+-----+-----+
#> |    TH2  | 76.8|0.052|
#> +---------+-----+-----+
#> |    TH3  |  1.4|0.108|
#> +---------+-----+-----+
#> |  OM1:1  | 0.45| 0.13|
#> +---------+-----+-----+
#> |  OM2:2  | 0.37| 0.19|
#> +---------+-----+-----+
#> |  OM3:3  | 0.77| 0.29|
#> +---------+-----+-----+
#> |  SI1:1  | 0.13|0.065|
#> +---------+-----+-----+

file.remove(new.files) # remove these files
#> [1] TRUE TRUE TRUE TRUE TRUE
setwd(od)  # restore working directory