Visualisasi data ini bersumber dari https://r4ds.had.co.nz/data-visualisation.html

Cara memvisualisasikan data dalam R adalah dengan menggunakan paket ggplot2. ggplot2 merupakan salah satu inti dari tidyverse. Oleh karena itu aktifkan terlebih dahulu library tidyverse sebelum menggunakannya.

library(tidyverse)
## -- Attaching packages --------------------------------------- tidyverse 1.3.0 --
## v ggplot2 3.3.3     v purrr   0.3.4
## v tibble  3.0.6     v dplyr   1.0.4
## v tidyr   1.1.2     v stringr 1.4.0
## v readr   1.4.0     v forcats 0.5.1
## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

Tidyverse hanya diinstal sekali saja, tetapi setiap kali memulai sesi baru tidyverse perlu dkatifkan.

  1. Membuat grafik yang menunjukkan jawaban apakah mobil dengan mesin besar menggunakan lebih banyak bahan bakar daripada mobil dengan mesin kecil.

Data frame mpg mpg berisi 38 model mobil hasil pengamatan yang dikumpulkan oleh the US Environmental Protection Agency.

mpg
## # A tibble: 234 x 11
##    manufacturer model    displ  year   cyl trans   drv     cty   hwy fl    class
##    <chr>        <chr>    <dbl> <int> <int> <chr>   <chr> <int> <int> <chr> <chr>
##  1 audi         a4         1.8  1999     4 auto(l~ f        18    29 p     comp~
##  2 audi         a4         1.8  1999     4 manual~ f        21    29 p     comp~
##  3 audi         a4         2    2008     4 manual~ f        20    31 p     comp~
##  4 audi         a4         2    2008     4 auto(a~ f        21    30 p     comp~
##  5 audi         a4         2.8  1999     6 auto(l~ f        16    26 p     comp~
##  6 audi         a4         2.8  1999     6 manual~ f        18    26 p     comp~
##  7 audi         a4         3.1  2008     6 auto(a~ f        18    27 p     comp~
##  8 audi         a4 quat~   1.8  1999     4 manual~ 4        18    26 p     comp~
##  9 audi         a4 quat~   1.8  1999     4 auto(l~ 4        16    25 p     comp~
## 10 audi         a4 quat~   2    2008     4 manual~ 4        20    28 p     comp~
## # ... with 224 more rows

Data set mpg meliputi variabel: 1. displ, menunjukkan ukuran mesin mobil dalam satuan liter. 2. hwy, menunjukkan efisiensi konsumsi bahan bakar mobil di jalan raya, dalam satuan mil per galon (mpg). Sebuah mobil dengan efisiensi bahan bakar rendah menguras lebih banyak bahan bakar daripada mobil dengan efisiensi bahan bakar tinggi untuk jarak tempuh yang sama.

Membuat sebuah ggplot dengan x = displ, y = hwy

ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy))

Plot tersebut memperlihatkan hubungan negatif antara ukuran mesin (displ) dan efisiensi bahan bakar (hwy). Dengan kata lain, mobil dengan mesin besar menggunakan lebih banyak bahan bakar.

Pemetaan Estetik Menampilkan data berdasarkan jenis mobil dengan berbagai warna

ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy, color = class))

Menampilkan data berdasarkan jenis mobil dengan berbagai ukuran dalam bentuk diskrit.

ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy, size = class))
## Warning: Using size for a discrete variable is not advised.

#> Warning: Using size for a discrete variable is not advised.

Pemetaan dengan bentuk yang lebih baik

# Left
ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy, alpha = class))
## Warning: Using alpha for a discrete variable is not advised.

# Right
ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy, shape = class))
## Warning: The shape palette can deal with a maximum of 6 discrete values because
## more than 6 becomes difficult to discriminate; you have 7. Consider
## specifying shapes manually if you must have them.
## Warning: Removed 62 rows containing missing values (geom_point).

Pemetaan dengan warna biru

ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy), color = "blue")