LAPORAN PRAKTIKUM KE-1
METODE STATISTIKA II
“UJI HIPOTESIS”
Oleh:
Asisten Praktikum :
LABORATORIUM STATISTIKA
DEPARTEMEN STATISTIKA
FAKULTAS MATEMATIKA DAN ILMU PENGETAHUAN ALAM
UNIVERSITAS BRAWIJAYA
2023
Peraturan Pengerjaan
1. Laporan praktikum dikerjakan secara individu.
2. Lampiran berupa hasil tangkapan layar input dan output pada RStudio.
3. Laporan menggunakan font Times New Roman dengan ukuran 12.
4. Ukuran kertas adalah A4.
5. Top, right, dan bottom margin sebesar 1 cm, sedangkan left margin sebesar 2 cm.
6. Setiap lembar pada laporan wajib diberi nomor halaman.
7. File laporan dikumpulkan dalam bentuk PDF dengan format nama: No. Urut_Nama_Tugas1
8. Pengumpulan maksimal pada tanggal 27 April 2023 pukul 23.59.
1
BAB I
STUDI KASUS
Soal
1. Beberapa peneliti baru-baru ini melakukan suatu percobaan terhadap obat baru untuk
menyembuhkan diare. Peneliti membandingkan obat baru tersebut dengan obat lama agar
mengetahui keefektifan waktu penyembuhan. Diketahui data yang telah terkumpul adalah sebagai
berikut.
Jenis obat Rata-Rata Ragam Ukuran
Sampel Populasi Sampel
Obat 5.50 0.40 50
lama
Obat baru 5.30 0.30 100
Dari informasi diatas, ujilah apakah rata-rata penyembuhan penyakit diare dengan menggunakan
obat lama membutuhkan waktu yang lebih lama dibanding dengan menggunakan obat baru? (α =
5%)
2. Seorang manajer perusahaan ingin mengetahui apakah ada perbedaan prestasi penjualan antara
sebelum dan sesudah karyawan diberi pelatihan marketing. Setelah dilakukan rekapitulasi jumlah
penjualan terhadap 15 orang karyawan, didapatkan data rata-rata penjualan (unit/hari) sebagai
berikut.
Sebelum Pelatihan Sesudah Pelatihan
2 4
3 3
3 4
2 3
3 4
3 5
4 3
2 3
3 3
4 4
4 4
4 4
2
2 4
3 3
3 3
Lakukan analisis pada percobaan tersebut dengan diketahui taraf nyata sebesar 5%!
3. Dua macam makanan yaitu wet food dan dry food diberikan pada kucing secara terpisah untuk
jangka waktu tertentu. Ingin diketahui macam makanan mana yang lebih baik bagi kucing
tersebut. Sampel acak yang terdiri atas 11 kucing diberi makanan dry food dan 10 kucing lainnya
diberikan makanan wet food. Pertambahan berat badan kucing (dalam ons) hasil percobaan adalah
sebagai berikut.
Wet Food 3.1 3.0 3.3 2. 2.6 3.0 3.6 2. 3.8 4.0 3.4
9 7
Dry Food 2.7 2.9 3.4 3. 3.3 2.9 3.0 3. 2.6 3.7
2 0
Dalam taraf nyata 5%, tentukan apakah kedua makanan itu sama baiknya?
4. Diketahui 30% dari tanaman petani di Klojen yang diberikan insektisida ternyata gagal tumbuh.
Peneliti ingin melakukan penelitian baru pada sampel sebanyak 500 tanaman. Saat dilakukan
pengujian, diperoleh fakta bahwa 25% tanaman diantaranya gagal tumbuh. Dengan α sebesar 5%,
uji penelitian tersebut!
3
BAB II
HASIL DAN PEMBAHASAN
2.1 Pembahasan
A. Manual
Soal :
1) Diketahui:
Jenis obat Rata-Rata Sampel ( y Ragam Populasi (σ 2) Ukuran Sampel (n)
)
Obat lama (L) y L = 5.50 2
σ L = 0.40 n L = 50
Obat baru (B) y B = 5.30 2
σ B = 0.30 n B = 100
Ditanya:
Dari informasi diatas, ujilah apakah rata-rata penyembuhan penyakit diare dengan
menggunakan obat lama membutuhkan waktu yang lebih lama dibanding dengan
menggunakan obat baru? (α = 5%)
Jawab:
a) Menentukan hipotesis
Hipotesis: H 0 : μ1=μ 2 VS H 1 : μ1 ≠ μ2
b) Menentukan taraf nyata dan titik kritis
Taraf nyata (α) = 5%
Titik kritis ( Z α = Z ) = 1,96 0,025
2
c) Menentukan statistik uji dan p-value
|x 1−x 2|−|μ 1−μ2| 0,2−0
√ √
Z Hitung = |Z Hit| = σ σ = 0,40 0,30 = 1,907
2 2
+ 1 2 +
n1 n1 50 100
p-value = 2 × P(Z¿1,907)
= 2 × 0,02826
= 0,05652
d) Membuat keputusan dan kesimpulan
Keputusan:
Karena |Z Hit| (1,907) ¿ ZTabel (1,96), maka H 0 diterima
Karena p-value (0,05652) ¿ α (0,05), maka H 0 diterima
Kesimpulan:
Dengan taraf nyata 5%, dapat disimpulkan bahwa kedua sampel memiliki rata-rata yang
sama
e) Menentukan selang kepercayaan
( √ √ )
2 2 2 2
σL σB σ L σB
P ( y L − y B ) −Z α + ≤ μ L −μ B ≤ ( y L− y B ) −Z α + = 1−¿ α
2
nL nB 2
nL nB
(
P ( 0,20 )−( 1,96 ) ( √ 0.40 +
50 100
0.30
) ≤ μ −μ ≤ ( 0,20 )+(1,96)(
L B
√ 50 + 100 ))= 0,95
0.40 0.30
P( ( 0,20 )−0,205567 ≤ μ L −μ B ≤ ( 0,20 ) +0,205567 ) = 0,95
P(−0,005567 ≤ μ L−μ B ≤0,405567 ) = 0,95
4
Karena nilai 0 berada dalam selang kepercayaan, maka H 0diterima
5
2) Diketahui:
Sebelum
Pelatihan 2 3 3 2 3 3 4 2 3 4 4 4 2 3 3
Jumlah
Sesudah
Pelatihan 4 3 4 3 4 5 3 3 3 4 4 4 4 3 3
Dj -2 0 -1 -1 -1 -2 1 -1 0 0 0 0 -2 0 0 -9
Ditanya:
Lakukan analisis pada percobaan tersebut dengan diketahui taraf nyata sebesar 5%!
Jawab:
a) Menentukan hipotesis
Hipotesis: H 0 : μd =C VS H 1 : μd ≠ C
b) Menentukan taraf nyata dan titik kritis
Taraf nyata (α) = 5%
Titik kritis (t α =t ) = 2,145
(n−1) 0,025(14)
2
c) Menentukan statistik uji
n
D= ∑ j =
D −9
= −¿ 0,6
j =1
15
n
√ √
2
sD = ( D −D ) = 11,6 = √ 0,828571 = 0,910259
n
∑ j n−1 14
j=1
|D|−μ p |−0,6|−0
0,6
|t hit| = s D = 0,910259 = 0,235028 = 2,55289
√n √15
p-value = 2 × P(t ¿2,55289)
= 2 × 0,011494
= 0,022988
d) Membuat kesimpulan
Keputusan:
Karena |t Hit| (2,55289) ¿ t Tabel (2,145), maka H 0 ditolak
Karena p-value (0,022988) ¿ α (0,05), maka H 0 ditolak
Kesimpulan:
Dengan tingkat kepercayaan 95%, dapat disimpulkan bahwa kedua rata-rata tidak sama
e) Menentukan selang kepercayaan
( √ √)
2 2
Sd Sd
P ( D ) −t α ≤ μ1−μ2 ≤ ( D )+ t α = 1−¿ α
2
( db ) n 2
(db) n
(
P (−0,6 )−2,145
√ 0,828571
15
≤ μ1−μ 2 ≤ (−0,6 ) +2,145
0,828571
15 √
= 0,95 )
(
P (−0,6 )−2,145
√ 0,828571
15
≤ μ1−μ 2 ≤ (−0,6 ) +2,145
0,828571
15 √
= 0,95 )
P( (−0,6 )−0,504135 ≤ μ 1−μ2 ≤ (−0,6 ) +0,504135 ) = 0,95
P(−1,104135 ≤ μ 1−μ2 ≤−0,095865 ) = 0,95
6
Karena nilai 0 tidak berada dalam selang kepercayaan, maka H 0ditolak
3) Diketahui:
Wet Food (Y 1) 3.1 3.0 3.3 2.9 2.6 3.0 3.6 2.7 3.8 4.0 3.4
Dry Food (Y 2) 2.7 2.9 3.4 3.2 3.3 2.9 3.0 3.0 2.6 3.7
2
y 1 = 3,218 S 1 = 0,20 n1 = 11
2
y 2 = 3,07 S 2 = 0,11 n2 = 10
Ditanya:
Dalam taraf nyata 5%, tentukan apakah kedua makanan itu sama baiknya?
Jawab:
a) Uji kesamaan dua ragam
2
S 0,20
F hitung = 2Besar = = 1,82
S Kecil 0,11
F Tabel = F 0,05(10,9) = 3,14
Karena F hitung (1,82) ¿ F Tabel (3,14), maka ragam diasumsikan sama
b) Menentukan hipotesis
Hipotesis: H 0 : μ1=μ 2 VS H 1 : μ1 ≠ μ2
c) Menentukan taraf nyata dan titik kritis
Taraf nyata (α) = 5%
Titik kritis t α ( 2
=t 0,025(19) = 2,093
(n1 +n2−2) )
d) Menentukan statistik uji
2 ( n1−1 ) S21 +( n2−1)S22 ( 10 ) 0,20 × ( 9 ) 0,11
S gab = = = 0,157
n1+ n2−2 19
| y 1− y 2|−|μ1−μ 2| |0,148|−|0|
|t hit| =
p-value
√
S2 gab S2 gab = 0,157 0,157 = 0,855
n1
+
n2
= 2 × P(t ¿0,855)
11
+
10 √
= 2 × 0,201602
= 0,403204
e) Membuat keputusan dan kesimpulan
Keputusan:
Karena |t hit| (0,855) ¿ t tabel (2,093), maka terima H 0
Karena p-value (0,403204) ¿ α (0,05), maka H 0 diterima
Kesimpulan:
Dengan tingkat kepercayaan 95%, dapat disimpulkan bahwa kedua pakan dapat dianggap
sama baik
f) Menentukan selang kepercayaan
( √ √ )
2 2 2 2
S gab S gab S gab S gab
P ( y 1 − y 2 )−t α + ≤ μ L −μ B ≤ ( y 1− y 2 ) +t α + = 1−¿ α
( db )
2
n1 n2 2
(db) n1 n2
(
P ( 0,148 )−2,093
√ 0,157 0,157
11
+
10
≤ μ L−μ B ≤ ( 0,148 )+2,093
11 √
0,157 0,157
+
10
= 0,95 )
7
P( ( 0,148 )−0,362353 ≤ μ L −μB ≤ ( 0,148 ) +0,362353 ) = 0,95
P(−0,214353 ≤ μL −μ B ≤0,510353 ) = 0,95
Karena nilai 0 berada dalam selang kepercayaan, maka H 0diterima
4) Diketahui:
^p1 = 0,3 q^ 1 = 0,7 n1 = 500
^p2 = 0,25 q^ 2 = 0,75 n2 = 500
Ditanya:
Dengan α sebesar 5%, uji penelitian tersebut!
Jawab:
a) Menentukan hipotesis
Hipotesis: H 0 : p1= p2 VS H 1 : p1 ≠ p2
b) Menentukan taraf nyata dan titik kritis
Taraf nyata (α) = 5%
( )
Titik kritis Z α =Z 0,025 = 1,96
2
c) Menentukan statistik uji
x1 + x 2 150+125
p= = =0,275
n1 +n 2 500+500
( ^p1−^p2 ) −( p 1− p2 ) ( 0,3−0,25 )−0
Z hit =
√ n1
p-value = 2 × P(Z ¿1,77)
n2 √
p ( 1−p ) p ( 1− p ) = 0,275( 0,725) 0,275 (0,725) = 1,77054
+
500
+
500
= 2 × 0,0384
= 0,0768
d) Membuat kesimpulan
Keputusan:
Karena Z hit (1,77054) ¿ ZTabel (1,96), maka H 0 diterima
Karena p-value (0,0768) ¿ α (0,05), maka H 0 diterima
Kesimpulan:
Dengan tingkat kepercayaan 95%, dapat disimpulkan bahwa kedua proporsi tanaman
petani yang gagal tumbuh adalah sama
e) Menentukan selang kepercayaan
(
P ( ^p1 − ^p 2 )−Z α
2 √ ^p1 q^ 1 ^p2 q^ 2
n1
+
n2 √
≤ p1− p2 ≤ ( ^p 1− ^p2 ) +Z α
2
n1
+
n2)
^p1 q^ 1 ^p2 q^ 2
= 1−¿ α
(
P ( 0,05 )−1,96
√ 0,21+0,1875
500
≤ p1− p 2 ≤ ( 0,05 ) +1,96
√
0,21+0,1875
500
= 0,95 )
P( ( 0,05 )−1,96(0,0282)≤ p1− p2 ≤ ( 0,05 ) +1,96(0,0282) )= 0,95
P( ( 0,05 )−0,055272 ≤ p1− p2 ≤ ( 0,05 ) +0,055272 )= 0,95
P(−0,005272 ≤ p 1− p2 ≤ 0,105272 )= 0,95
Karena nilai 0 berada dalam selang kepercayaan, maka H 0diterima
B. Output RStudio
8
Soal :
1) Syntax :
[Link](mean.x = 5.50, sigma.x = sqrt(0.4), n.x = 50,
mean.y = 5.30, sigma.y = sqrt(0.3), n.y = 100,
alternative = "[Link]", mu = 0, [Link] = 0.95)
Output :
Two-sample z-Test
data: Summarized x and y
z = 1.9069, p-value = 0.05653
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.005562757 0.405562757
sample estimates:
mean of x mean of y
5.5 5.3
2) Syntax :
Prestasi=c(seq(1:15))
Sebelum=c(2,3,3,2,3,3,4,2,3,4,4,4,2,3,3)
Sesudah=c(4,3,4,3,4,5,3,3,3,4,4,4,4,3,3)
data=[Link](Prestasi,Sebelum,Sesudah)
data
[Link](x=data$Sebelum, y=data$Sesudah,
alternative = "[Link]",
mu = 0, paired = TRUE, [Link] = TRUE,
[Link] = 0.95)
Output :
Paired t-test
data: data$Sebelum and data$Sesudah
t = -2.5529, df = 14, p-value = 0.02299
alternative hypothesis: true mean difference is not equal to 0
95 percent confidence interval:
-1.10408463 -0.09591537
sample estimates:
mean difference
-0.6
3) Syntax :
[Link](mean.x = 3.218, s.x = sqrt(0.20), n.x = 11,
mean.y = 3.07, s.y = sqrt(0.11), n.y = 10,
alternative = "[Link]",
mu = 0, [Link] = TRUE,
[Link] = 0.95)
Output :
Standard Two-Sample t-Test
data: Summarized x and y
t = 0.85387, df = 19, p-value = 0.4038
9
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.2147825 0.5107825
sample estimates:
mean of x mean of y
3.218 3.070
4) Syntax :
[Link](x=c(150,125),n=c(500,500), alternative =
"[Link]",correct = FALSE)
Output :
2-sample test for equality of proportions without continuity
correction
data: c(150, 125) out of c(500, 500)
X-squared = 3.1348, df = 1, p-value = 0.07664
alternative hypothesis: [Link]
95 percent confidence interval:
-0.005262643 0.105262643
sample estimates:
prop 1 prop 2
0.30 0.25
2.2 Perbandingan Hasil Hitung Manual dengan Hasil RStudio
N Perbandinga
Hasil Hitung Manual Hasil Output RStudio
o n
1. Statistik Uji 1,907 1.9069
P-Value 0,05652 0.05653
Selang −¿0.005562757≤ μ L −μ B ≤ 0.40
−0,005567 ≤ μL −μ B ≤ 0,405567
Kepercayaan 5562757
2. Statistik Uji 2,55289 -2.5529
P-Value 0,022988 0.02299
Selang −¿1.10408463≤ μ 1−μ2 ≤−¿0.0
−1,104135 ≤ μ1 −μ 2 ≤−0,095865
Kepercayaan 9591537
3. Statistik Uji 0,855 0.85387
P-Value 0,403204 0.4038
Selang −¿0.2147825 ≤ μ L −μ B ≤
−0,214353 ≤ μ L −μ B ≤ 0,510353
Kepercayaan 0.5107825
4. Statistik Uji 1,77054 X-squared = 3.1348
P-Value 0,0768 0.07664
Selang −0,005272 ≤ p1− p 2 ≤ 0,105272−¿0.005262643 ≤ p 1− p2 ≤
0.105262643
10
Kepercayaan
11
BAB III
METODOLOGI
3.1 Source code dan pembahasan
No Source code Pembahasan
1. [Link]("BSDA") Menginstal packages BSDA pada RStudio
2. library("BSDA") Mengaktifkan packages untuk agar
tersimpan ke file BSDA
3. [Link]("TeachingDemos") Menginstal packages TeachingDemos pada
Rstudio
4. library("TeachingDemos") Mengaktifkan packages untuk agar
tersimpan ke file TeachingDemos
5. [Link](mean.x = 5.50, sigma.x = Menguji hipotesis dua populasi ragam
sqrt(0.4), n.x = 50, mean.y = diketahui
5.30, sigma.y = sqrt(0.3), n.y =
100, alternative = "[Link]",
mu = 0, [Link] = 0.95)
6. Prestasi=c(seq(1:15)) Menguji hipotesis dua populasi ragam
Sebelum=c(2,3,3,2,3,3,4,2,3,4,4,4,2,3,3) dependen
Sesudah=c(4,3,4,3,4,5,3,3,3,4,4,4,4,3,3)
data=[Link](Prestasi,Sebelum,Sesudah
)
data
[Link](x=data$Sebelum, y=data$Sesudah,
alternative = "[Link]", mu = 0,
paired = TRUE, [Link] = TRUE,
[Link] = 0.95)
7. [Link](mean.x = 3.218, s.x = sqrt(0.20), Menguji hipotesis dua populasi ragam tidak
n.x = 11, mean.y = 3.07, s.y = diketahui (independen) dengan asumsi
sqrt(0.11), n.y = 10, alternative = ragam sama
"[Link]", mu = 0, [Link] =
TRUE, [Link] = 0.95)
8. [Link](x=c(150,125),n=c(500,500), Menguji hipotesis dua populasi proporsi
alternative = "[Link]",correct
= FALSE)
12
LAMPIRAN
Input :
Output :
13
14