Lembaga : Universitas Islam Negeri Maulana Malik Ibrahim Malang

Fakultas : Sains dan Teknologi

Program Studi : Teknik Informatika

Mata Kuliah : Linear Algebra (C)

0.1 Pengertian Data Set

Relasional data set merupakan kumpulan item data yang memiliki perpaduan atau hubungan yang telah ditentukan sebelumnya. Berbagai item ini diatur sebagai satu set tabel menggunakan kolom dan baris. Tabel digunakan untuk menyimpan informasi tentang objek yang ditampilkan dalam database. Tiap kolom dalam tabel memuat tipe data ekskusif , dan bidang tersebut menyimpan nilai aktual atribut. Baris dalam tabel mempresentasikan perpaduan nilai terkait berdasarkan satu objek atau entitas. Tiap baris pada tabel dapat ditandai dengan pengidentifikasi unik yang disebut kunci utama (keyword), dan baris di antara beberapa tabel dapat dibuat saling terkait menggunakan kunci asing. Berikut tahapan dalam menerapkan relasional data set pada RStudio menggunakan bahasa pemrograman R.

library(tidyverse)
## -- Attaching packages --------------------------------------- tidyverse 1.3.1 --
## v ggplot2 3.3.5     v purrr   0.3.4
## v tibble  3.1.6     v dplyr   1.0.8
## v tidyr   1.2.0     v stringr 1.4.0
## v readr   2.1.2     v forcats 0.5.1
## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

0.2 1. Tabel Data Indeks Nama dan NIM Mahasiswa Universitas Islam Negeri Maulana Malik Ibrahim Malang Semester 2 Yang Berasal Dari Madura

data_mahasiswa <- data.frame(
  NIM = c(210605110031, 210104110151, 210503110075, 210104110030, 210104110016, 210104110070, 210606110024, 210301110045, 210201110156, 210202110144, 210201110002, 21030111015, 210401110025, 210203110082, 210201110201, 210104110153, 210301110002, 210701110007, 210301110178, 210602110083, 210602110042, 210607110022
  ),
  Nama = c("RifqiMurtiani", "Nisa Ulfi Jannah", "Miskah Fitriani Eltari", "Ahmad Zaki Mubarok", "Ahmad Aviv Al mumtaz", "Junaidi", "Karell Jovi Samsas", "Muhammad fachri", "Yunia Fatimah", "Silvi Safitri Kartika Sari", "Muhammad Riski Rhomadhon", "Sumbardi", "Apreta", "Wafiq Sinta Nuria", "Muhammad Adi Fikri", "Muhammad Dzaki Rohmatullah", "Misbahul Munir AlAbid", "Jessica Adya Permatasari", "Airul", "Dila Mardiana", "Maulana Rizki Akbar", "Muhammad Ikhsan"
  
),
stringsAsFactors = FALSE)
data_mahasiswa

0.3 2. Tabel Data Jenis Program Study

data_Prodi <- data.frame(
  NIM = c(210605110031, 210104110151, 210503110075, 210104110030, 210104110016, 210104110070, 210606110024, 210301110045, 210201110156, 210202110144, 210201110002, 21030111015, 210401110025, 210203110082, 210201110201, 210104110153, 210301110002, 210701110007, 210301110178, 210602110083, 210602110042, 210607110022
  ),
  Nama = c("Teknik Informatika", "Pendidikan Bahasa Arab", "Perbankan Syariah", "Pendidikan Bahasa Arab", "Pendidikan Bahasa Arab", "Pendidikan Bahasa Arab", "Teknik Arsitektur", "Bahasa Sastra Arab", "Hukum Keluarga Islam", "Hukum Ekonomi Syari'ah", "Hukum Keluarga Islam", "Bahasa Sastra Arab", "Psikologi", "Hukum Tata Negara", "Hukum Keluarga Islam", "Pendidikan Bahasa Arab", "Bahasa Sastra Arab", "Pendidikan Dokter", "Bahasa Sastra Arab", "Biologi", "Biologi", "Perpustakaan dan Ilmu Informasi"
  
),
stringsAsFactors = FALSE)
data_Prodi

0.4 Tabel Data Nama Mahasiswa Beserta Dengan Program Study

library(dplyr)
Nama14 <- merge(
  x = data_mahasiswa,
  y = data_Prodi,
  by = 'NIM',
  all = TRUE
)
Nama14

0.5 4. Tabel Data Alamat Mahasiswa Universitas Islam Negeri Maulana Malik Ibrahim Malang Semester 2 Yang Berasal Dari Madura

Alamat1 <- data.frame(
  NIM = c(210605110031, 210104110151, 210503110075, 210104110030, 210104110016, 210104110070, 210606110024, 210301110045, 210201110156, 210202110144, 210201110002, 21030111015, 210401110025, 210203110082, 210201110201, 210104110153, 210301110002, 210701110007, 210301110178, 210602110083, 210602110042, 210607110022
  ),
  Alamat = c("Ogan Ilir", "Muara Gula Lama", "Tanjung Seteko Indralaya", "Payaraman", "Bangun jaya Ogan Ilir", "Sungai Lilin Muba", "Lubuk linggau", "Palembang Bukit Lama", "Betung Barat Penukal ABAB Lematang Ilir", "Kelekar Muara Enim", "Meranjat Ogan Ilir", "Musi Banyuasin", "OKUT", "OKUT", "Banyuasin", "Lubuk Linggau", "Ogan Ilir", "Muara Kelingi", "Rambutan", "OKUT", "Baturaja OKU", "Lubuk Linggau"
  ),
stringsAsFactors = FALSE)
Alamat1

0.6 5. Tabel Gabungan Antara Nama Mahasiswa, Program Study dan Alamat

library(dplyr)
Namaa14 <- merge(
  x = Nama14,
  y = Alamat1,
  by = 'NIM',
  all = TRUE
)
Namaa14

0.7 6. Penerapan Data Set pada Inner Join

innerJoin <- data_mahasiswa %>%
  inner_join(data_Prodi, by = "NIM")
innerJoin

0.8 7. Penerapan Data Set pada Outer Join

1.Aleft Join

leftjoin <- left_join(data_mahasiswa,data_Prodi)
## Joining, by = c("NIM", "Nama")
leftjoin
  1. A Right Join
rightjoin <- right_join(data_mahasiswa
                        ,data_Prodi)
## Joining, by = c("NIM", "Nama")
rightjoin
  1. A Full Join
fulljoin <- full_join(data_mahasiswa,data_Prodi)
## Joining, by = c("NIM", "Nama")
fulljoin