R version 3.1.1 (2014-07-10) -- "Sock it to Me"
> bl <- c(140, 138, 150, 148, 135)
> fu <- c(138, 136, 148, 146, 133)
> t.test(fu, bl, alternative = "two.sided", paired = TRUE)
Error in t.test.default(fu, bl, alternative = "two.sided", paired = TRUE) :
data are essentially constant
จากนั้นฉันเปลี่ยนอักขระเพียงชุดเดียวในชุดข้อมูลของฉัน:
> fu <- c(138, 136, 148, 146, 132)
และมันก็วิ่ง ...
> t.test(fu, bl, alternative = "two.sided", paired = TRUE)
Paired t-test
ฉันหายไปนี่อะไร
bl-fu
.sd(bl-fu)
ตอนนี้ หากยังไม่ชัดเจนให้ทำดังนี้:dif=bl-fu
ถ้าอย่างn=length(dif)
นั้นmean(dif)/(sd(dif)/sqrt(n))
... คุณเห็นไหม