Ini adalah interval kepercayaan yang diestimasi oleh prop.test
n <- 600; x <- 276; p <- 0.40
prop.test(x, n, p, alternative="two.sided", conf.level=0.95, correct=T)
95 percent confidence interval:
0.4196787 0.5008409
Saya mencoba mereproduksinya, membaca kode di bawah prop.test. Inilah cara yang disederhanakan untuk mendapatkan dua batasan itu
ESTIMATE <- x/n
YATES <- 0.5
conf.level <- 0.95
z <- qnorm((1 + conf.level)/2)
YATES <- min(YATES, abs(x - n * p))
z22n <- z^2/(2 * n)
p.c <- ESTIMATE + YATES/n
(p.c + z22n + z * sqrt(p.c * (1 - p.c)/n + z22n/(2 * n)))/(1 + 2 * z22n)
[1] 0.5008409
p.c <- ESTIMATE - YATES/n
(p.c + z22n - z * sqrt(p.c * (1 - p.c)/n + z22n/(2 * n)))/(1 + 2 * z22n)
[1] 0.4196787
Bisakah Anda jelaskan kepada saya mengapa probabilitas keberhasilan yang mendasari (p) digunakan pada baris 5? atau mungkin Anda bisa menyarankan di mana saya dapat menemukan lebih banyak info tentang koreksi YATES ini yang mempengaruhi ESTIMATE.
Terima kasih
sumber
binom
Paket R juga memiliki Agresti-Coull CI.