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