Sulfi {NRAIA}R Documentation

Pharmacokinetics of sulfisoxazole

Description

The Sulfi data frame has 12 rows and 2 columns from an experiment on the pharmacokinetics of sulfisoxazole.

Format

This data frame contains the following columns:

time
a numeric vector giving the time since drug administration (min).
conc
a numeric vector giving the observed concentration of sulfisoxazole (ug/ml).

Source

Bates and Watts (1998), Nonlinear Regression Analysis and Its Applications, Wiley (Appendix A1.5).

Examples

plot(conc ~ time, data = Sulfi, las = 1,
     xlab = "Time since drug administration (min)",
     ylab = expression(plain("Sulfisoxazole concentration (")
               *mu*plain("g/ml)")),
     main = "Sulfisoxazole data and fitted curve")
fm1 <- nls(conc ~ SSbiexp(time, A1, lrc1, A2, lrc2),
    data = Sulfi)
summary(fm1)
usr <- par("usr")
xx <- seq(usr[1], usr[2], len = 50)
lines(xx, predict(fm1, list(time = xx)))
plot(conc ~ time, data = Sulfi, las = 1, log = "y",
     xlab = "Time since drug administration (min)",
     ylab = expression(plain("Sulfisoxazole concentration (")
               *mu*plain("g/ml)")),
     main = "Sulfisoxazole data (log scale)")
lines(xx, predict(fm1, list(time = xx)))

[Package NRAIA version 0.9-7 Index]