Dalam analisa ini perbandingan nilai yang diambil yaitu nilai keterampilan dari 11 (seluruh) mata pelajaran semester ganjil yang dilakukan dengan cara tatap muka dan semester genap yang dilakukan menggunakan metode online yang diperoleh dari SMP NEGERI 1 DUKUHTURI kelas 7D.

Dari data tersebut didapat nilai keterampilan yang menghasilkan 2 kolom yaitu kolom ganjil dan kolom genap, kemudian dianalisa menggunakan Metode ANOVA. Analisa ini dilakukan untuk mengetahui apakah rata - rata nilai keterampilan tiap mata pelajaran per semester sama atau berubah.

Sumber data yang dihasilkan Dari Perbandingan Nilai Rata - rata Keterampilan Ganjil (Tatap Muka) dan Genap (Online)

  1. Data ini diambil di SMP NEGERI 1 DUKUHTURI kelas 7D tahun ajaran 2019/2020.
  2. Data nilai keterampilan dari seluruh mata pelajaran ini diambil dari link berikut : https://drive.google.com/file/d/1u4PhgbMbnKr50Uo8Qu0BAl0igzHHXZzH/view?usp=sharing
  3. Sumber data semester ganjil diambil dari link berikut : https://drive.google.com/file/d/1kIMndfMUlKdH9-5htCcwNgLOVrGafc1H/view?usp=sharing
  4. sumber data semester genap diambil dari link berikut : https://drive.google.com/file/d/1peaz3zj5hrgpRtNQokEi0WjAYVbSnX86/view?usp=sharing

Dibawah ini adalah Script code dan hasil untuk menampilkan data tabel nilai keterampilan ganjil dan genap dengan format xlsx:

library(readxl)
## Warning: package 'readxl' was built under R version 4.0.3
data = read_xlsx("E:/Data Semester 3/Statistika/keterampilan.xlsx")
                
data
## # A tibble: 11 x 2
##    ganjil genap
##     <dbl> <dbl>
##  1     88    88
##  2     83    81
##  3     77    75
##  4     83    82
##  5     78    75
##  6     85    84
##  7     83    78
##  8     77    80
##  9     83    84
## 10     81    81
## 11     81    84

Dibawah ini adalah Script code dan hasil Untuk menampilkan gabungan dari baris data menjadi vektor, menggunakan fungsi t agar nilai menjadi urut menggunakan metode ANOVA sebagai berikut :

 r = c(t(as.matrix(data)))
 r
##  [1] 88 88 83 81 77 75 83 82 78 75 85 84 83 78 77 80 83 84 81 81 81 84

Dibawah ini adalah Script code untuk membuat variabel yang menghasilkan kategori, level treatment, dan data treatment menggunakan metode ANOVA sebagai berikut :

f = c("ganjil", "genap")
k = 2
n = 11

Dibawah ini adalah Script code dan hasil untuk membuat factor level sesuai anggota variabel r, menggunakan fungsi gl pada metode ANOVA sebagai berikut :

tm = gl(k, 1, n*k, factor(f))
tm
##  [1] ganjil genap  ganjil genap  ganjil genap  ganjil genap  ganjil genap 
## [11] ganjil genap  ganjil genap  ganjil genap  ganjil genap  ganjil genap 
## [21] ganjil genap 
## Levels: ganjil genap

Dibawah ini adalah Script code dan hasil untuk uji Anova (aov) dan untuk print out hasil (summary) sebagai berikut :

av = aov(r~tm)
summary(av)
##             Df Sum Sq Mean Sq F value Pr(>F)
## tm           1   2.23   2.227   0.162  0.692
## Residuals   20 275.09  13.755
Kesimpulan dari analisa data Perbandingan Nilai Rata - rata Keterampilan seluruh mata pelajaran semester Ganjil (Tatap Muka) dan Genap (Online) menggunakan Metode Anova

Karena p-value (0,692) lebih besar dari signifikan (0,05) maka hipotesis diterima (data setara), sehingga nilai rata - rata keterampilan dari seluruh mata pelajaran ganjil / genap yang kita analisa tersebut adalah sama.