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