 |
| Import dan Update Data Frame dari Google Sheet dengan R |
Selamat berjumpa kembali dengan blog sederhana ini. Pada artikel terbaru ini, kita akan belajar bersama mengenai cara melakukan import dan update data yang bersumber dari googlesheet akun gmail kita dengan R.
Aktivitas import dan update data merupakan dua aktivitas yang biasa kita lakukan sebelum mengolah, analisis, dan diseminasi hasilnya. Import data berarti kita memanggil dan memasukkana data yang akan kita olah ke dalam aplikasi yang dalam konteks ini adalah aplikasi R. Sedangkan Update adalah aktivitas memperbarui data mulai dari menghapus, menambahkan, menggabung, atau memecah data sehingga data yang baru memiliki karakteristik yang sama namun isi berbeda atau menjadi data baru akibat pemecahan data.
Pada praktik kali ini, package yang akan kita gunakan adalah googlesheet4 yang bisa diaktivasi dengan memanggil library() terlebih dahulu. Berikut tahapan praktik bagaimana kita melakukan import dan update data dari googlesheet dengan R:
# Aktivasi Library
library(googlesheets4)
# Import data yang ada sebelumnya di Google Sheet
sheetku <- gs4_get("https://docs.google.com/spreadsheets/d/xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxgsjdbdjss/edit?usp=sharing")
# Data yang telah diimport dari Google Sheet
before <- read_sheet(sheetku, sheet = "Sheet1")
## √ Reading from "Nilai_UTS_Fisika".
## √ Range ''Sheet1''.
before
## # A tibble: 15 x 2
## Nama Nilai
## <chr> <dbl>
## 1 Ahmad 70
## 2 Budi 70
## 3 Cici 75
## 4 Doni 78
## 5 Eka 78
## 6 Farhan 80
## 7 Handayani 90
## 8 Ika 86
## 9 Jordan 85
## 10 Kunti 85
# Menambahkan data baru
data_baru <- data.frame(
Nama = c("Kimi", "Dony", "Mufid", "Cindy", "Dea"),
Nilai = c(90, 78, 88, 88, 85)
)
data_baru
## Nama Nilai
## 1 Kimi 90
## 2 Dony 78
## 3 Mufid 88
## 4 Cindy 88
## 5 Dea 85
# melakukan penggabungan data
data_update <- rbind(before, data_baru)
data_update
## # A tibble: 20 x 2
## Nama Nilai
## <chr> <dbl>
## 1 Ahmad 70
## 2 Budi 70
## 3 Cici 75
## 4 Doni 78
## 5 Eka 78
## 6 Farhan 80
## 7 Handayani 90
## 8 Ika 86
## 9 Jordan 85
## 10 Kunti 85
## 11 Kimi 90
## 12 Dony 78
## 13 Mufid 88
## 14 Cindy 88
## 15 Dea 85
# Mengupdate data yang ada dengan data terbaru
write_sheet(data_update, sheetku, sheet = "Sheet1")
## √ Writing to "Nilai_UTS_Fisika".
## √ Writing to sheet 'Sheet1'.
# Import data yang ada sebelumnya di Google Sheet
data_update <- gs4_get("https://docs.google.com/spreadsheets/d/xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxgsjdbdjss/edit?usp=sharing")
data_update <- read_sheet(sheetku, sheet = "Sheet1")
## √ Reading from "Nilai_UTS_Fisika".
## √ Range ''Sheet1''.
data_update
## # A tibble: 20 x 2
## Nama Nilai
## <chr> <dbl>
## 1 Ahmad 70
## 2 Budi 70
## 3 Cici 75
## 4 Doni 78
## 5 Eka 78
## 6 Farhan 80
## 7 Handayani 90
## 8 Ika 86
## 9 Jordan 85
## 10 Kunti 85
## 11 Kimi 90
## 12 Dony 78
## 13 Mufid 88
## 14 Cindy 88
## 15 Dea 85
Demikian sedikit sharing kita kali ini. Semoga sedikit ini dapat bermanfaat bagi para pembaca setia blog ini. Jangan lupa untuk share artikel ini kepada yang lain. Selamat memahami dan mempraktikkan!