วิธีทำแบบทดสอบอันดับ wilcoxon ที่เซ็นชื่อใน r
การ ทดสอบ Wilcoxon Signed-Rank เป็นเวอร์ชันที่ไม่มีพารามิเตอร์ของ การ ทดสอบ t ที่จับคู่ ใช้เพื่อทดสอบว่ามีความแตกต่างที่มีนัยสำคัญระหว่างค่าเฉลี่ยของประชากรทั้งสองหรือไม่ เมื่อการกระจายตัวของความแตกต่างระหว่างทั้งสองตัวอย่างไม่ถือว่าเป็นเรื่องปกติ
บทช่วยสอนนี้จะอธิบายวิธีดำเนินการทดสอบอันดับแบบลงนามของ Wilcoxon ใน R
ตัวอย่าง: Wilcoxon ลงนามการทดสอบอันดับใน R
สมมติว่าโค้ชบาสเกตบอลต้องการทราบว่าโปรแกรมการฝึกซ้อมบางอย่างเพิ่มจำนวนการโยนโทษของผู้เล่นของเขาหรือไม่ เพื่อทดสอบสิ่งนี้ เขาขอให้ผู้เล่น 15 คนโยนโทษ 20 ครั้งก่อนและหลังโปรแกรมการฝึกซ้อม
เนื่องจากผู้เล่นแต่ละคนสามารถ “จับคู่” กับตัวเองได้ โค้ชจึงวางแผนที่จะใช้การทดสอบแบบจับคู่เพื่อพิจารณาว่ามีความแตกต่างอย่างมีนัยสำคัญระหว่างจำนวนการโยนโทษโดยเฉลี่ยก่อนและหลังโปรแกรมการฝึกซ้อมหรือไม่ การฝึกอบรม. อย่างไรก็ตาม การกระจายของความแตกต่างกลับกลายเป็นว่าไม่ปกติ ซึ่งเป็นเหตุผลว่าทำไมผู้ฝึกสอนจึงใช้การทดสอบ Wilcoxon Signed-Rank แทน
ตารางต่อไปนี้แสดงจำนวนการโยนโทษ (จากความพยายาม 20 ครั้ง) โดยผู้เล่นแต่ละคนจาก 15 คน ก่อนและหลังโปรแกรมการฝึกซ้อม:
ในการทำการทดสอบ Wilcoxon Signed-Rank กับข้อมูลนี้ใน R เราสามารถใช้ฟังก์ชัน wicox.test() ซึ่งใช้ไวยากรณ์ต่อไปนี้:
Wilcox.test(x, y, คู่ = TRUE)
ทอง:
- x, y: เวกเตอร์สองตัวของค่าข้อมูล
- จับคู่: การตั้งค่านี้เป็น TRUE จะบอก R ว่าเวกเตอร์สองตัวของเรามีข้อมูลที่จับคู่กัน
รหัสต่อไปนี้สาธิตวิธีการใช้ฟังก์ชันนี้เพื่อทำการทดสอบ Wilcoxon Signed-Rank กับข้อมูลนี้:
#create the two vectors of data before <- c(14, 17, 12, 15, 15, 9, 12, 13, 13, 15, 19, 17, 14, 14, 16) after <- c(15, 17, 15, 15, 17, 14, 9, 14, 11, 16, 18, 20, 20, 10, 17) #perform Wilcoxon Signed-Rank Test wilcox.test(before, after, paired=TRUE) Wilcoxon signed rank test with continuity correction data: before and after V = 29.5, p-value = 0.275 alternative hypothesis: true location shift is not equal to 0
สถิติการทดสอบคือ 29.5 และค่า p ที่สอดคล้องกันคือ 0.275 เนื่องจากค่า p นี้ไม่น้อยกว่า 0.05 เราจึงไม่สามารถปฏิเสธสมมติฐานว่างได้ ไม่มีความแตกต่างที่มีนัยสำคัญทางสถิติในจำนวนการโยนโทษก่อนและหลังผู้เล่นเข้าร่วมโปรแกรมการฝึกซ้อม
ตามค่าเริ่มต้น ฟังก์ชันนี้จะทำการทดสอบอันดับลงนามของ Wilcoxon แบบสองด้าน แต่คุณสามารถระบุการทดสอบทางซ้ายหรือทางขวาได้โดยใช้อาร์กิวเมนต์ ทางเลือก :
#perform left-tailed Wilcoxon Signed-Rank Test wilcox.test(before, after, paired=TRUE, alternative="less") Wilcoxon signed rank test with continuity correction data: before and after V = 29.5, p-value = 0.1375 alternative hypothesis: true location shift is less than 0 #perform right-tailed Wilcoxon Signed-Rank Test wilcox.test(before, after, paired=TRUE, alternative="greater") Wilcoxon signed rank test with continuity correction data: before and after V = 29.5, p-value = 0.8774 alternative hypothesis: true location shift is greater than 0
แหล่งข้อมูลเพิ่มเติม
บทนำเกี่ยวกับการทดสอบอันดับแบบลงนามของ Wilcoxon
เครื่องคำนวณการทดสอบสถานที่ลงนามของ Wilcoxon