Uji wilcoxon matched-paired signed test adalah salah satu uji nonparametris yang digunakan untuk mengukurada tidaknya perbedaan nilai rata-rata 2 kelompok sampel yang saling berpasangan (dependen). Uji wilcoxon biasa digunakan pada penelitian desain pre-post test.
Sebuah perusahaan Pharmasi sedang mengembangkan suplemen penambahan berat badan pada anak-anak. Perusahaan ingin mengetahui khasiat suplemen tersebut sebelum dipasarkan secara komersial. Untuk itu perusahaan mencoba obat tersebut secara kontinu terhadap 15 orang siswa sekolah dasar yang sudah diukur terlebih dahulu berat badannya.Setelah 3 bulan kemudian siswa-siswa tersebut ditimbang berat badannya lagi untuk mngetahui apakah ada peningkatan berat badannya yang nyata.
#kode untuk menginput data
sebelum <- c(25,27,20,21,18,19,20,22,24,25,24,27,23,25,22)
sesudah <- c(26,26,22,24,22,21,24,21,26,26,25,28,25,27,25)
#kode untuk membuat tabel data
datawilco <- data.frame(sebelum,sesudah)
datawilco
## sebelum sesudah
## 1 25 26
## 2 27 26
## 3 20 22
## 4 21 24
## 5 18 22
## 6 19 21
## 7 20 24
## 8 22 21
## 9 24 26
## 10 25 26
## 11 24 25
## 12 27 28
## 13 23 25
## 14 25 27
## 15 22 25
#kode untuk melakukan uji wilcoxon
wilcox.test(sebelum,sesudah,paired = TRUE ,data = datawilco)
## Warning in wilcox.test.default(sebelum, sesudah, paired = TRUE, data =
## datawilco): cannot compute exact p-value with ties
##
## Wilcoxon signed rank test with continuity correction
##
## data: sebelum and sesudah
## V = 7, p-value = 0.002556
## alternative hypothesis: true location shift is not equal to 0
Hasil analisis
Uji hipotesis :
H0 : Tidak Terdapat perbedaan nilai rata rata pada data sebelum dan sesudah
H1 : Terdapat perbedaan nilai rata rata pada data sebelum dan sesudah
Daerah Kritik :
H0 ditolak jika p value kurang dari alpha 0,05
Nilai P value :0,00256
Kesimpulan :
P value < 0,05 maka H0 di tolak artinya Terdapat perbedaan nilai rata rata pada data sebelum dan sesudah sehingga suplemen penambah berat badan mampu menaikan berat badan anak anak.
summary(datawilco)
## sebelum sesudah
## Min. :18.0 Min. :21.00
## 1st Qu.:20.5 1st Qu.:23.00
## Median :23.0 Median :25.00
## Mean :22.8 Mean :24.53
## 3rd Qu.:25.0 3rd Qu.:26.00
## Max. :27.0 Max. :28.00
Berdasarkan hasil summary data bahwa nilai pusat mean dan median data sesudah lebih tinggi dari data sebelum yang menunjukan bahwa penggunaan suplemen mampu meningkatkan berat badan