R bacteria 藥物治療後細菌的存在

說明

對澳大利亞北領地患有中耳炎的兒童進行的流感嗜血杆菌細菌檢測。

用法

bacteria

格式

該 DataFrame 有 220 行和以下列：

y

存在或不存在：級別為 n 和 y 的因子。

美聯社

活性/安慰劑：具有 a 和 p 水平的因子。

希洛

高/低合規性：具有 hi 和 lo 級別的因子。

星期

數字：測試周。

ID

主題 ID：一個因子。

特爾特

具有級別 placebo 、 drug 和 drug+ 的因子，ap 和 hilo 的重新編碼。

細節

A. Leach 博士對澳大利亞北領地 50 名有中耳炎病史的兒童測試了一種藥物的效果。這些孩子被隨機分配服用藥物或安慰劑，並接受積極鼓勵以遵守服用藥物的規定。

在第 0、2、4、6 和 11 周檢查了流感嗜血杆菌的存在：其中 30 項檢查缺失，未包含在此 DataFrame 中。

例子

contrasts(bacteria$trt) <- structure(contr.sdif(3),
     dimnames = list(NULL, c("drug", "encourage")))
## fixed effects analyses
## IGNORE_RDIFF_BEGIN
summary(glm(y ~ trt * week, binomial, data = bacteria))
summary(glm(y ~ trt + week, binomial, data = bacteria))
summary(glm(y ~ trt + I(week > 2), binomial, data = bacteria))
## IGNORE_RDIFF_END

# conditional random-effects analysis
library(survival)
bacteria$Time <- rep(1, nrow(bacteria))
coxph(Surv(Time, unclass(y)) ~ week + strata(ID),
      data = bacteria, method = "exact")
coxph(Surv(Time, unclass(y)) ~ factor(week) + strata(ID),
      data = bacteria, method = "exact")
coxph(Surv(Time, unclass(y)) ~ I(week > 2) + strata(ID),
      data = bacteria, method = "exact")

# PQL glmm analysis
library(nlme)
## IGNORE_RDIFF_BEGIN
summary(glmmPQL(y ~ trt + I(week > 2), random = ~ 1 | ID,
                family = binomial, data = bacteria))
## IGNORE_RDIFF_END

來源

阿曼達·利奇博士通過詹姆斯·麥克布魯姆先生。

參考

Menzies School of Health Research 1999-2000 Annual Report. p.20. https://www.menzies.edu.au/icms_docs/172302_2000_Annual_report.pdf.

Venables, W. N. and Ripley, B. D. (2002) Modern Applied Statistics with S. Fourth edition. Springer.