Akbar Rizki, S.Stat. M.Si
5 Februari 2021 10.00-11.30 WIB
R adalah implementasi sebuah komputasi dan pemrograman bahasa statistika
Silahkan ikuti petunjuk pada Video Tutorial
Terdapat fungsi-fungsi untuk mengimplementasikan metode statistik tingkat lanjut. Fungsi-fungsi ini tergabung sebagai package (atau library) tertentu
Terdapat package default di R, tidak perlu di install secara terpisah, dan tidak perlu dipanggil secara khusus ketika fungsi pada package tersebut diperlukan.
Namun, banyak package yang perlu diinstall dengan perintah install.packages("nama_packacge") untuk analisis tertentu
Berdasar data dari Microsoft R Application Network, saat modul ini dibuat (2 Februari 2021 pukul 22:24 WIB) terdapat 18.015 package R pada CRAN R.
Berikut adalah daftar dari 14 Package Default di R
## [1] "base" "compiler" "datasets" "graphics" "grDevices" "grid"
## [7] "methods" "parallel" "splines" "stats" "stats4" "tcltk"
## [13] "tools" "utils"
– Pertemuan I : knitr, xlsx, rio
– Pertemuan II : dpylr, xlsx, rio, car, lmtest
– Pertemuan III & IV : dplyr, ResourceSelection, pscl, InformationValue
A<-5 sama dengan A=5 sama dengan 5->A
A<-5 berbeda dengan a<-10
NULL, TRUE, FALSE, q, c, t, sin, cos, pi, exp, dan lain-lain)#Pada R, syntax pada baris yang didahului oleh # tidak diproses. Oleh sebab itu, # digunakan untuk memberikan keterangan
## [1] 10
Silahkan Ketikkan Operasi Sederhana berikut pada Software R atau RStudio Anda :
## [1] 15
## [1] 5
## [1] 50
## [1] 2
## [1] 100
## [1] 1000
## [1] 10
## [1] 10
## [1] 6
## [1] 7
## [1] 6
## [1] 20
Terdapat berbagai macam Objek di R, di antaranya adalah Vector, Matrix, Array, Factor, List, Data Frame
Untuk Pelatihan ini, kita bahas mengenai Vector dan Data Frame. Referensi lebih lanjut : http://adv-r.had.co.nz/Data-structures.html
## [1] 2 4 7 3
## [1] 2
## [1] 4 7
## [1] 2 4 7 3
## [1] 2 3
## [1] 4 7 3
## [1] "numeric"
## [1] "character"
g <- cbind.data.frame(a,b) # Menggabungkan b dan a secara cbind (column bind) dan menjadi format data frame
class(g)## [1] "data.frame"
## a b
## 1 2 w
## 2 4 x
## 3 7 y
## 4 3 z
## a b
## 1 2 w
## 2 4 x
## 3 7 y
## 4 3 z
## a b
## 1 2 w
## a b
## 3 7 y
## 4 3 z
## a b
## 1 2 w
## 4 3 z
## a b
## 1 2 w
## 2 4 x
## 3 7 y
## 4 3 z
## a b
## 1 2 w
## [1] 2 4 7 3
## [1] "w" "x" "y" "z"
## [1] "w"
## a b
## 1 2 w
## 2 4 x
## 3 7 y
## 4 3 z
## [1] 2 4 7 3
## [1] "w" "x" "y" "z"
## [1] 4
## [1] "z"
Terdapat Data berikut :
| y | x1 | x2 | x3 |
|---|---|---|---|
| 137 | 14 | 22 | 14 |
| 140 | 15 | 41 | 11 |
| 127 | 13 | 45 | 8 |
| 105 | 18 | 43 | 2 |
| 118 | 16 | 29 | 8 |
Silahkan Bapak/Ibu
1 membuat folder baru untuk Pelatihan ini, misal E:/Pelatihan,
2 kemudian membuka http://ipb.link/datalatihan
3 mendownload data dengan nama data_01.csv, data_01.sav, data_01.txt, data_01.xlsx, dan disimpan di Folder E:/Pelatihan
Data yang sama terdapat pada Penyimpanan Online ( github ) pada link https://github.com/Nr5D/data.
| y | x1 | x2 | x3 |
|---|---|---|---|
| 137 | 14 | 22 | 14 |
| 140 | 15 | 41 | 11 |
| 127 | 13 | 45 | 8 |
| 105 | 18 | 43 | 2 |
| 118 | 16 | 29 | 8 |
y<-c(137,140,127,105,118)
x1<-c(14,15,13,18,16)
x2<-c(22,41,45,43,29)
x3<-c(14,11,8,2,8)
data<-cbind.data.frame(y,x1,x2,x3)
data## y x1 x2 x3
## 1 137 14 22 14
## 2 140 15 41 11
## 3 127 13 45 8
## 4 105 18 43 2
## 5 118 16 29 8
data_csv<-read.csv("E:/Pelatihan/data_01.csv", sep=",", header = TRUE) # Membaca data dari file CSV
data_csv## y x1 x2 x3
## 1 137 14 22 14
## 2 140 15 41 11
## 3 127 13 45 8
## 4 105 18 43 2
## 5 118 16 29 8
Dengan mengatur folder kerja ini, akan lebih memudahkan.
setwd("E:/Pelatihan") # Setting Folder Kerja
data_txt<-read.table("data_01.txt", sep="\t", header=TRUE) # File txt dibaca dengan Fungsi read.table
data_xlsx<-xlsx::read.xlsx("data_01.xlsx", sheetName = "data_01") # File xlsx dari Microsoft Office dibaca dengan Fungsi read.xlsx dari Package xlsx
data_sav<-rio::import("data_01.sav") # File sav dari SPSS dibaca dengan Fungsi import dari Package rioBeberapa Komputer, dengan Versi Java yang tidak sesuai dengan versi R, akan mengalami Error ketika menggunakan fungsi read.xlsx dari package xlsx
Tidak sesuai misal Java 32 bit sedangkan R nya 64 bit, sebaiknya dilakukan update java melalui link berikut :
- https://www.java.com/en/download/
- https://www.java.com/en/download/manual.jsp
Secara prinsip, sama dengan membaca file dari folder pribadi, hanya saja, Alamat Folder diganti dengan direct URL dari file.
idata_csv<-read.csv("https://raw.githubusercontent.com/Nr5D/data/main/data_01.csv", sep=",", header = TRUE)
idata_csv## y x1 x2 x3
## 1 137 14 22 14
## 2 140 15 41 11
## 3 127 13 45 8
## 4 105 18 43 2
## 5 118 16 29 8
idata_txt<-read.table("https://raw.githubusercontent.com/Nr5D/data/main/data_01.txt", sep="\t", header=TRUE)
idata_txt## y x1 x2 x3
## 1 137 14 22 14
## 2 140 15 41 11
## 3 127 13 45 8
## 4 105 18 43 2
## 5 118 16 29 8
Dalam membaca data digunakan salah satu dari data yg telah dimasukkan ke sistem R.
## [1] 5 4
Dari output tersebut, tampak bahwa ada 5 (baris) dan 4 (kolom)
## 'data.frame': 5 obs. of 4 variables:
## $ y : int 137 140 127 105 118
## $ x1: int 14 15 13 18 16
## $ x2: int 22 41 45 43 29
## $ x3: int 14 11 8 2 8
## y x1 x2 x3
## 1 137 14 22 14
## 2 140 15 41 11
## 3 127 13 45 8
## 4 105 18 43 2
## 5 118 16 29 8
## [1] 137 140 127 105 118
## x1 x2 x3
## 1 14 22 14
## 2 15 41 11
## 3 13 45 8
## 4 18 43 2
## 5 16 29 8
## x1 x2 x3
## 1 14 22 14
## 2 15 41 11
## 3 13 45 8
## 4 18 43 2
## 5 16 29 8
## [1] 926
## [1] 627
## [1] 1.923538
## [1] 41
## [1] 2
## [1] 140
## y x1 x2 x3
## y 1.0000000 -0.7565031 -0.2896367 0.9246061
## x1 -0.7565031 1.0000000 0.1299688 -0.7185246
## x2 -0.2896367 0.1299688 1.0000000 -0.6236349
## x3 0.9246061 -0.7185246 -0.6236349 1.0000000
Referensi lebih lanjut: Anda bisa eksplorasi lebih lanjut berbagai tampilan korelasi dengan Correlogram dari package corrplot melalui link berikut : http://www.sthda.com/english/wiki/visualize-correlation-matrix-using-correlogram
data<-data_csv # Menyimpan data frame "data_csv" ke objek baru "data"
# Mengatur Folder Kerja dimana file-file berikut akan disimpan.
setwd("E://Pelatihan//")
# Save ke csv
write.csv(data,'data_01.csv', row.names = FALSE)
# Save ke xlsx
xlsx::write.xlsx(data, file = "data_01.xlsx", sheetName = "data_01", append = FALSE, row.names = FALSE)
# Save ke txt
write.table(data, file = "data_01.txt", sep = "\t", row.names = FALSE)
# Save ke sav
rio::export(data, "data_01.sav") Fungsi ini akan menyimpan file dalam format .png pada Folder Kerja