Cara Import dan Update Data Frame dari Google Sheet dengan R

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!