R Theoph 茶碱的药代动力学

说明

Theoph DataFrame 包含来自茶碱药代动力学实验的 132 行和 5 列数据。

用法

Theoph

格式

类的对象c("nfnGroupedData", "nfGroupedData", "groupedData", "data.frame")包含以下列：

主题

具有 1 、...、12 级别的有序因子，用于标识进行观察的对象。排序是通过增加观察到的茶碱的最大浓度来进行的。

重量

受试者的体重(公斤)。

剂量

口服给予受试者的茶碱剂量(mg/kg)。

时间

抽取样本时给药后的时间(小时)。

浓度

样品中的茶碱浓度(mg/L)。

细节

Boeckmann、Sheiner 和 Beal (1994) 报告了 Robert Upton 博士对抗哮喘药物茶碱动力学研究的数据。 12 名受试者口服茶碱，然后在接下来的 25 小时内的 11 个时间点测量血清浓度。

Davidian 和 Giltinan (1995) 以及 Pinheiro 和 Bates (2000) 使用 two-compartment 开放药代动力学模型对这些数据进行了分析，其中 self-starting 模型函数 SSfol 可用。

该数据集最初是包 nlme 的一部分，并且具有用于其分组数据类的方法(包括 [ 、 as.data.frame 、 plot 和 print )。

例子

require(stats); require(graphics)

coplot(conc ~ Time | Subject, data = Theoph, show.given = FALSE)
Theoph.4 <- subset(Theoph, Subject == 4)
fm1 <- nls(conc ~ SSfol(Dose, Time, lKe, lKa, lCl),
           data = Theoph.4)
summary(fm1)
plot(conc ~ Time, data = Theoph.4,
     xlab = "Time since drug administration (hr)",
     ylab = "Theophylline concentration (mg/L)",
     main = "Observed concentrations and fitted model",
     sub  = "Theophylline data - Subject 4 only",
     las = 1, col = 4)
xvals <- seq(0, par("usr")[2], length.out = 55)
lines(xvals, predict(fm1, newdata = list(Time = xvals)),
      col = 4)

来源

Boeckmann, A. J.、Sheiner, L. B. 和 Beal, S. L. (1994)，NONMEM 用户指南：第五部分，NONMEM 项目组，加利福尼亚大学旧金山分校。

Davidian, M. 和 Giltinan, D. M. (1995) 重复测量数据的非线性模型，Chapman & Hall(第 5.5 节，第 145 页和第 6.6 节，第 176 页)

Pinheiro, J. C. 和 Bates, D. M. (2000) S 和 S-PLUS 中的混合效应模型，Springer(附录 A.29)

也可以看看

SSfol