Visualisasi Data Inflow Uang Pulau Bali dan Nusa Tenggara

Universitas : UIN Maulana Malik Ibrahim Malang

Jurusan : Teknik Informatika

Linier Algebra C ’21

Data Inflow Uang Pulau Bali dan Nusa Tenggara Tahun 2011-2021

library(readxl)

## Warning: package 'readxl' was built under R version 4.1.2

datainflow <- read_excel(path = "Data Inflow.xlsx")
datainflow

## # A tibble: 11 x 5
##    Tahun `Bali Nusra`   Bali `Nusa Tenggara Barat` `Nusa Tenggara Timur`
##    <dbl>        <dbl>  <dbl>                 <dbl>                 <dbl>
##  1  2011       10322.  6394.                 1803.                 2125.
##  2  2012       14613.  8202.                 3676.                 2735.
##  3  2013       17512.  5066.                 7024.                 5422.
##  4  2014       20807. 11590.                 5704.                 3512.
##  5  2015       23008. 13072.                 6285.                 3651.
##  6  2016       30965. 17914.                 8842.                 4210.
##  7  2017       30797. 16962.                 8383.                 5452.
##  8  2018       33866. 18610.                 9140.                 6116.
##  9  2019       38116. 21422.                 9614.                 7080.
## 10  2020       29400. 14735.                 8007.                 6657.
## 11  2021       18892.  7505.                 5888.                 5498.

Daerah Bali Nusra

datainflow$`Bali Nusra`

##  [1] 10322.12 14613.12 17512.32 20806.70 23007.90 30965.42 30797.19 33865.63
##  [9] 38115.75 29399.54 18891.76

datainflowbalinusra <- datainflow$`Bali Nusra`
plot(datainflow$`Bali Nusra`, type = "l", col = "blue")

Daerah Bali

datainflow$`Bali`

##  [1]  6394.349  8202.467  5066.456 11589.965 13071.655 17913.703 16962.106
##  [8] 18609.607 21421.705 14735.153  7505.179

plot(datainflow$`Bali`, type = "l", col = "red")

Daerah Nusa Tenggara Barat

datainflow$`Nusa Tenggara Barat`

##  [1] 1802.620 3675.694 7023.831 5704.367 6285.023 8841.741 8383.482 9140.030
##  [9] 9614.277 8007.142 5888.434

plot(datainflow$`Nusa Tenggara Barat`, type = "l", col = "magenta")

Daerah Nusa Tenggara Timur

datainflow$`Nusa Tenggara Timur`

##  [1] 2125.150 2734.957 5422.035 3512.369 3651.227 4209.979 5451.604 6115.996
##  [9] 7079.767 6657.242 5498.152

plot(datainflow$`Nusa Tenggara Timur`, type = "l", col = "orange")

---

Referensi

https://rpubs.com/suhartono-uinmaliki/860359