R Remifentanil 瑞芬太尼藥代動力學

說明

總共 65 名患者在不同時間段以不同速率靜脈輸注瑞芬太尼(一種強效鎮痛藥)。瑞芬太尼的濃度測量與幾個協變量一起進行，生成具有 2107 行和 12 列的 Remifentanil DataFrame 。

用法

data("Remifentanil", package = "nlme")

格式

此 DataFrame (屬於 "groupedData" 類，特別是 "nfnGroupedData" )包含以下列：

ID：

數字(患者)ID。

Subject：

具有 65 個級別的 ordered 因子(屬於 ID)： 30 < 21 < 25 < 23 < 29 < ... ... < 36 < 6 < 5 < 10 < 9 。

Time：

從輸注開始的時間(以分鍾為單位)(numeric)。

conc：

瑞芬太尼濃度，單位為 [ng/ml](數字)。

Rate：

輸注速度[微克/分鍾]。

Amt：

當前時間間隔內給予的瑞芬太尼的量，以 [μg] 為單位。

Age：

患者的年齡(以年為單位)。

Sex：

患者的性別，級別為 Female 和 Male 的 factor 。

Ht：

患者身高(厘米)。

Wt：

患者體重(公斤)。

BSA：

體表麵積(DuBois 和 DuBois 1916)：% BSA := Wt^{0.425} \cdot Ht^{0.725} \cdot 0.007184.

LBM：

瘦體重(James 1976)，男性 LBM_m := 1.1 Wt - 128 (Wt/Ht)^2 和女性 LBM_f := 1.07 Wt - 148 (Wt/Ht)^2 的公式略有不同。

例子

plot(Remifentanil, type = "l", lwd = 2) # shows the 65 patients' remi profiles

## The same on  log-log  scale  (*more* sensible for modeling ?):
plot(Remifentanil, type = "l", lwd = 2, scales = list(log=TRUE))

str(Remifentanil)
summary(Remifentanil)

plot(xtabs(~Subject, Remifentanil))
summary(unclass(table(Remifentanil$Subject)))
## between 20 and 54 measurements per patient (median: 24; mean: 32.42)

## Only first measurement of each patient :
dim(Remi.1 <- Remifentanil[!duplicated(Remifentanil[,"ID"]),]) #  65 x 12

LBMfn <- function(Wt, Ht, Sex) ifelse(Sex == "Female",
                                        1.07 * Wt - 148*(Wt/Ht)^2,
                                        1.1  * Wt - 128*(Wt/Ht)^2)
with(Remi.1,
    stopifnot(all.equal(BSA, Wt^{0.425} * Ht^{0.725} * 0.007184, tol = 1.5e-5),
              all.equal(LBM, LBMfn(Wt, Ht, Sex),                 tol = 7e-7)
))

## Rate: typically  3 µg / kg body weight, but :
sunflowerplot(Rate ~ Wt, Remifentanil)
abline(0,3, lty=2, col=adjustcolor("black", 0.5))

作者

of this help page: Niels Hagenbuch and Martin Maechler, SfS ETH Zurich.

來源

Pinheiro, J. C. 和 Bates, D. M. (2000)。 S 和 S-PLUS 的混合效果模型，紐約施普林格。

參考

Minto CF, Schnider TW, Egan TD, Youngs E, Lemmens HJM, Gambus PL, Billard V, Hoke JF, Moore KHP, Hermann DJ, Muir KT, Mandema JW, Shafer SL (1997). Influence of age and gender on the pharmacokinetics and pharmacodynamics of remifentanil: I. Model development. Anesthesiology 86 1, 10-23. https://pubs.asahq.org/anesthesiology/article/86/1/10/35947/Influence-of-Age-and-Gender-on-the

Charles F. Minto, Thomas W. Schnider and Steven L. Shafer (1997). Pharmacokinetics and Pharmacodynamics of Remifentanil: II. Model Application. Anesthesiology 86 1, 24-33. https://pubs.asahq.org/anesthesiology/article/86/1/24/35925/Pharmacokinetics-and-Pharmacodynamics-of