Koneksi Database MySQL dengan R

Contoh RMySQL

Apr 21, 2019·4 min read

Koneksi Database MySQL dengan R

Pertama persiapkan terlebih dahulu databasenya, bukalah xampp dan aktifkan “Apache” dan “MySQL” dengan mengklik tombol “start” pada menu “Action” seperti berikut,

tunggu sampai warna pada Apache dan MySQL berganti menjadi hijau. Kemudian masuklah ke folder c:/xampp/htdocs (dalam laptop saya letak xampp ada di drive c:/), dan buatlah folder baru misal “koneksiR”. Selanjutnya bukalah RStudio,

Pada menu utama klik “File” kemudian “New Project” kemudian akan muncul jendela seperti berikut,

kemudian pilihlah Existing Directory, arahkan pada folder c:/xampp/htdocs/koneksiR seperti berikut lalu klik “Create Project”

kemudian pada menu utama klik “File” dan pilih “New File”,

kita siap berkoding ria, install terlebih dahulu package yang dibutuhkan yakni “RMySQL” dan “dbConnect” dengan cara

kemudian klik “Run”

kita tunggu sampai proses instalasi package “RMySQL” selesai terlebih dahulu, setelah selesai kita lanjutkan dengan install packages “dbConnect”

> install.packages("RMySQL")
> install.packages("dbConnect")

kita tunggu juga sampai proses instalasi package dbConnect selesai,

kemudian untuk menjalankan kedua package tersebut gunakan perintah library()

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)

kemudian lakukan koneksi ke database “buku” yang telah kita buat sebelumnya (lihat kembali postingan saya sebelumnya disini) dengan perintah,

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)
> rconn=dbConnect(MySQL(),user="root",
                password="",
                host="127.0.0.1",
                dbname="buku")

dalam perintah tersebut kita definisikan nama “rconn” untuk membuat koneksi ke database “buku” dari R ke MySQL menggunakan fungsi “dbConnect”. kemudian klik “Run”

disisi jendela sebelah kanan akan muncul “rconn Formal class MySQL Connection” yang menandakan koneksi dari R ke database “buku” pada MySQL telah berhasil.

kemudian gunakan perintah “dbListTables” untuk melihat tabel-tabel di dalam database “buku”,

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)
> rconn=dbConnect(MySQL(),user="root",
                password="",
                host="127.0.0.1",
                dbname="buku")
> dbListTables(rconn)

kemudian klik “Run”vmaka akan muncul hasil seperti berikut,

> dbListTables(rconn)
[1] "penulis"

yang berarti database “buku” telah dapat diakses dan menunjukkan tabel di dalam database “buku” hanya ada satu, yakni tabel “penulis”.

kemudian untuk mengetahui field atau kolom apa saja didalam tabel penulis, maka kita gunakan perintah dbListFields(nama_koneksi, “nama_tabel”)

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)
> rconn=dbConnect(MySQL(),user="root",
                password="",
                host="127.0.0.1",
                dbname="buku")
> dbListTables(rconn)
> dbListFields(rconn, "penulis")

maka akan muncul hasil seperti berikut,

> dbListFields(rconn, "penulis")
[1] "id"    "penulis"

nampaklah disini bahwa didalam database “buku” terdapat tabel “penulis” dan didalamnya terdapat kolom/field “id” dan “penulis”.

Setelah itu akan kita lihat data di dalam tabel “penulis” kolom “penulis” dengan perintah “dbSendQuery”

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)
> rconn=dbConnect(MySQL(),user="root",
                password="",
                host="127.0.0.1",
                dbname="buku")
> dbListTables(rconn)
> dbListFields(rconn, "penulis")
> result=dbSendQuery(rconn,"select penulis from penulis")

jika tidak terdapat masalah, maka permintaan dengan nama “result” dapat dilanjutkan.

kemudian dengan perintah “fetch” kita akan mengambil data dari “result” seperti berikut, misal hanya diambil 5 data pertama,

> install.packages("RMySQL")
> install.packages("dbConnect")
> library(RMySQL)
> library(dbConnect)
> rconn=dbConnect(MySQL(),user="root",
                password="",
                host="127.0.0.1",
                dbname="buku")
> dbListTables(rconn)
> dbListFields(rconn, "penulis")
> result=dbSendQuery(rconn,"select penulis from penulis")
> data.hasil=fetch(result, n = 5)
> print(data.hasil)

yang memberikan hasil berikut