Tim IT kampus UNTIRTA mencatat kecepatan (Mbps) dari 25 titik akses WiFi yang dipilih secara acak, untuk menduga rata-rata kecepatan unduh SELURUH titik akses (populasi). Data :
data_wifi <- c(
18.2, 21.5, 19.8, 23.1, 17.6, 20.4, 22.9, 16.8, 19.1, 24.3,
18.7, 21.0, 20.2, 17.9, 23.6, 19.4, 22.1, 18.0, 20.9, 21.7,
16.5, 19.9, 23.4, 18.3, 21.2
)
Data kecepatan unduh dari 25 titik akses WiFi adalah sebagai berikut:
data_wifi <- c(18.2, 21.5, 19.8, 23.1, 17.6,
20.4, 22.9, 16.8, 19.1, 24.3,
18.7, 21.0, 20.2, 17.9, 23.6,
19.4, 22.1, 18.0, 20.9, 21.7,
16.5, 19.9, 23.4, 18.3, 21.2)
mean(data_wifi)
## [1] 20.26
sd(data_wifi)
## [1] 2.217732
Berdasarkan 25 data kecepatan unduh WiFi, diperoleh rata-rata kecepatan unduh sebesar 20,26 Mbps dengan standar deviasi sebesar 2,22 Mbps.
t.test(data_wifi, conf.level = 0.95)
##
## One Sample t-test
##
## data: data_wifi
## t = 45.677, df = 24, p-value < 2.2e-16
## alternative hypothesis: true mean is not equal to 0
## 95 percent confidence interval:
## 19.34457 21.17543
## sample estimates:
## mean of x
## 20.26
Berdasarkan hasil analisis, diperoleh interval kepercayaan 95% untuk rata-rata kecepatan unduh WiFi sebesar 19,34 hingga 21,18 Mbps. Artinya, dengan tingkat kepercayaan 95%, rata-rata kecepatan unduh populasi diperkirakan berada dalam rentang tersebut.
t.test(data_wifi, conf.level = 0.90)
##
## One Sample t-test
##
## data: data_wifi
## t = 45.677, df = 24, p-value < 2.2e-16
## alternative hypothesis: true mean is not equal to 0
## 90 percent confidence interval:
## 19.50114 21.01886
## sample estimates:
## mean of x
## 20.26
t.test(data_wifi, conf.level = 0.95)
##
## One Sample t-test
##
## data: data_wifi
## t = 45.677, df = 24, p-value < 2.2e-16
## alternative hypothesis: true mean is not equal to 0
## 95 percent confidence interval:
## 19.34457 21.17543
## sample estimates:
## mean of x
## 20.26
t.test(data_wifi, conf.level = 0.99)
##
## One Sample t-test
##
## data: data_wifi
## t = 45.677, df = 24, p-value < 2.2e-16
## alternative hypothesis: true mean is not equal to 0
## 99 percent confidence interval:
## 19.01943 21.50057
## sample estimates:
## mean of x
## 20.26
Berdasarkan hasil perhitungan, interval kepercayaan 90% adalah 19,50–21,02 Mbps, interval kepercayaan 95% adalah 19,34–21,18 Mbps, dan interval kepercayaan 99% adalah 19,02–21,50 Mbps. Terlihat bahwa semakin tinggi tingkat kepercayaan, semakin lebar interval yang dihasilkan. Hal ini karena tingkat kepercayaan yang lebih tinggi membutuhkan rentang yang lebih luas agar estimasi rata-rata populasi lebih meyakinkan.
Margin of error pada tingkat kepercayaan 95% adalah sebesar 0,92 Mbps. Artinya, rata-rata sampel sebesar 20,26 Mbps memiliki batas kesalahan estimasi sekitar ±0,92 Mbps dalam mengestimasi rata-rata populasi. Dengan demikian, rata-rata kecepatan unduh populasi diperkirakan berada pada rentang 19,34 hingga 21,18 Mbps pada tingkat kepercayaan 95%.
t.test(data_wifi, mu = 20, alternative = "greater")
##
## One Sample t-test
##
## data: data_wifi
## t = 0.58618, df = 24, p-value = 0.2816
## alternative hypothesis: true mean is greater than 20
## 95 percent confidence interval:
## 19.50114 Inf
## sample estimates:
## mean of x
## 20.26
Rata-rata sampel = 20,26 Mbps t hitung = 0,586 p-value ≈ 0,563
\[ p-value = 0,563 > 0,05 \] maka H₀ tidak ditolak.
Berdasarkan sampel 25 titik WiFi, belum terdapat bukti statistik yang cukup untuk menyatakan bahwa rata-rata kecepatan WiFi berbeda dari 20 Mbps. Walaupun rata-rata sampel adalah 20,26 Mbps, perbedaannya dengan 20 Mbps belum signifikan secara statistik.
Galat Tipe I terjadi jika kita menolak H₀ padahal H₀ sebenarnya benar. Dalam kasus ini, artinya kita menyimpulkan bahwa rata-rata WiFi berbeda dari 20 Mbps, padahal sebenarnya rata-rata populasi adalah 20 Mbps. Dengan tingkat signifikansi 5%, risiko Galat Tipe I adalah 5%.
Galat Tipe II terjadi jika kita tidak menolak H₀ padahal sebenarnya H₀ salah. Dalam kasus ini, artinya kita menyimpulkan bahwa belum ada perbedaan dari 20 Mbps, padahal sebenarnya rata-rata kecepatan WiFi memang berbeda dari 20 Mbps.