Masukkan data dalam format 2 kolom
Kolom pertama berisi data dan kolom kedua berisi kode
Sebelumnya kita mengubah format data dulu
Hal ini dapat dilakukan dengan menggunakan menu Statistika , pilih Manage variable in active data set/ atur peubah pada date set aktif, pilih atur ulang ke level faktor/ convert numeric variable to factors, sehingga diperoleh jendela seperti berikut:

Klik menu kode lalu pada level faktor klik gunakan angka, lalu OK
Selanjutnya klik menu:
Statistika > rerata > Anava satu arah
Pada kelompok: select kode
Pada peubah respon :lebar.daun
Cek list perbandingan berpasangan dan nilai tengah
Ok

Berikut outputnya:
> AnovaModel.1 <- aov(Lebar.Daun ~ Kode, data=Dataset)
> summary(AnovaModel.1)
Df Sum Sq Mean Sq F value Pr(>F)
Kode 2 419.8 209.9 1923232 <2e-16 ***
Residuals 27 0.0 0.0
---
mean sd data:n
1 4.99994 0.008893968 10
2 8.00008 0.012227546 10
3 13.99841 0.009941658 10
Karena nilai p-value F nya < 0.05 dikatakan minimal 1 pasangh dari jenis tersebut berbeda
Simultaneous Tests for General Linear Hypotheses
Multiple Comparisons of Means: Tukey Contrasts
Fit: aov(formula = Lebar.Daun ~ Kode, data = Dataset)
Linear Hypotheses:
Estimate Std. Error t value Pr(>|t|)
2 - 1 == 0 3.000140 0.004672 642.1 <2e-16 ***
3 - 1 == 0 8.998470 0.004672 1925.9 <2e-16 ***
3 - 2 == 0 5.998330 0.004672 1283.8 <2e-16 ***
Karena nilai p-value t nya < 0.05 dikatakan ketiga jenis pupuk berbeda
0 komentar:
Posting Komentar