WAHYU ZUHUDISTIA KHOIRI 19090129 3A UAS STSTISTIKA

##diskripsi data data yang saya gunakan adalah data yang saya ambil dari sekolah smp negeri bulakamba. Saya mengambil data mata semua mata pelajaran tahun 2019/2020 yang saya sudah dihutung rata rata dari pengetahuan dan keterampilan siswa kelas 8a dahulu sehingga kita tahu batasan siswa dalam hal pengetahuan dan keterapilan siswa itu sendiri

berikut ini adalah data yang saya sudah dihutung rata rata dari siswa kelas 8a untuk pengetahuan dan keterapilan siswa https://drive.google.com/file/d/1-5u25jTItYo9tju-XYxZLB7--4KHDTcW/view?usp=sharing:

#yang dilakukan pertama menguji proses data (proses pengujian) kita mengExport library untuk masukan data yang akan kita gunakan untuk masukan data rata rata yang kita buat tadi dan pasitikan data satu folder dengan projek yang kita buat. Dengan menggunkan rumus beerikut ;

library(readxl)
data = read_excel("data.xlsx")
View(data)

#setalah itu kita akan coba mengurangi kolom agar tidak terlalu banyak dan juga menghubungkan baris dengan vektors agar nilai yang akan berurutan.fungsi t (matrik Transpose) berikut :

data = data[,-1]
data

a = c(t(as.matrix(data)))
a

#nah terus kita bikin variabel baru untuk kategori,level treatment, dan data Treatment. dengan rumus beriku :

f = c("pengetahuian", "keterampilan")
k = 2 #treatment levels
n = 11

#untuk ini kita membuat fektor level sesuai anggota variabel r. dengan rumus gl berikut:

tm = gl(k, 1, n*k, factor(f))
tm

#yang terakhit kita menggunakan fungsi aov untuk untuk menguji coba, kemudian menggunakan fungsi summary untuk mahasilkanya. rumus berikut:

nilai = aov(a~tm)
summary(nilai)
summary(cars)
##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

##Hasil hasil pengujian menggunakan anova dapat disimpulkan bahwa rata rata dari kemampuan pengetahuan siswa dengan ketrampilan siswa, jadii nilai dari f value lebih dari 0.05 maka signifikan, sedangkan nilai dari p value lebih kecil dari level signifikan maka hippotesis ditolak.