Analogi Visualisasi Prediksi Data Inflow-Outflow Uang Kartal Pulau Bali dan Nusa Tenggara Setiap Bulan di Tahun 2019
Salsabila Ramadanti Nuraini, Prof.Dr.Suhartono,M.Kom
2/16/2022
Universitas : UIN Maulana Malik Ibrahim Malang
Jurusan : Teknik Informatika
Linier Algebra C ’21
Gambar 1: Bank Indonesia.
Provinsi DKI Jakarta memegang peran penting sebagai pusat pemerintahan dan pusat perekonomian di Indonesia. Pertumbuhan ekonomi yang terjadi di Provinsi DKI Jakarta salah satunya dipengaruhi oleh aktivitas transaksi keuangan masyarakat DKI Jakarta. Inflow yaitu informasi berupa aliran uang kertas dan uang logam yang masuk dari perbankan dan masyarakat ke Bank Indonesia, sedangkan outflow adalah informasi mengenai aliran uang kertas dan uang logam yang keluar dari Bank Indonesia kepada perbankan dan masyarakat. Gambaran inflow dan outflow uang kartal sangat diperlukan sebelum Bank Indonesia membuat kebijakan yang tepat untuk mengendalikan aktivitas pengedaran uang.
Data Inflow Pulau Bali dan Nusa Tenggara tahun 2019
library(readxl)## Warning: package 'readxl' was built under R version 4.1.2datainflow <- read_excel(path = "Data inflow 2019.xlsx")
datainflow## # A tibble: 12 x 5
## Keterangan `Bali Nusra` Bali `Nusa Tenggara Barat` `Nusa Tenggara~`
## <dttm> <dbl> <dbl> <dbl> <dbl>
## 1 2019-01-01 00:00:00 6578. 3472. 1514. 1591.
## 2 2019-02-01 00:00:00 3060. 1616. 805. 639.
## 3 2019-03-01 00:00:00 2773. 1701. 602. 470.
## 4 2019-04-01 00:00:00 2469. 1460. 550. 459.
## 5 2019-05-01 00:00:00 2048. 1253. 386. 410.
## 6 2019-06-01 00:00:00 5167. 2856. 1622. 688.
## 7 2019-07-01 00:00:00 2546. 1317. 806. 424.
## 8 2019-08-01 00:00:00 2884. 1640. 749. 495.
## 9 2019-09-01 00:00:00 2692. 1524. 609. 559.
## 10 2019-10-01 00:00:00 3034. 1759. 712. 563.
## 11 2019-11-01 00:00:00 2769. 1567. 750. 452.
## 12 2019-12-01 00:00:00 2095. 1256. 510. 329.Data Outflow Pulau Bali dan Nusa Tenggara Tahun 2019
library(readxl)
dataoutflow <- read_excel(path = "Data Outflow.xlsx")
dataoutflow## # A tibble: 12 x 5
## Keterangan `Bali Nusra` Bali `Nusa Tenggara Barat` `Nusa Tenggara~`
## <dttm> <dbl> <dbl> <dbl> <dbl>
## 1 2019-01-01 00:00:00 536. 362. 121. 52.4
## 2 2019-02-01 00:00:00 1988. 1288. 524. 176.
## 3 2019-03-01 00:00:00 2969. 2032. 711. 225.
## 4 2019-04-01 00:00:00 3897. 1595. 1467. 835.
## 5 2019-05-01 00:00:00 8314. 4132. 2777. 1404.
## 6 2019-06-01 00:00:00 1086. 682. 235. 169.
## 7 2019-07-01 00:00:00 3416. 1962. 511. 943.
## 8 2019-08-01 00:00:00 2515. 1376. 574. 565.
## 9 2019-09-01 00:00:00 2264. 1406. 657. 201.
## 10 2019-10-01 00:00:00 2414. 1366. 815. 233.
## 11 2019-11-01 00:00:00 2670. 1482. 612. 575.
## 12 2019-12-01 00:00:00 6611. 2970. 1282. 2359.Perbandingan Analogi Uang Kartal dari Provinsi Nusa Tenggara Barat dan Nusa Tenggara Timur
Analogi Perbandingan Data Inflow Setiap Bulan pada Tahun 2019.
plot(datainflow$`Nusa Tenggara Barat`,type = "l", col= "black")
lines(datainflow$`Nusa Tenggara Timur`,col="red")
legend("top",c("Inflow Nusa Tenggara Barat","Inflow Nusa Tenggara Timur"),fill=c("black","red"))
Analogi Perbandingan Data Outflow Setiap Bulan pada Tahun 2019.
plot(dataoutflow$`Nusa Tenggara Barat`,type = "l", col= "orange")
lines(dataoutflow$`Nusa Tenggara Timur`,col="magenta")
legend("top",c("Outflow Nusa Tenggara Barat","Outflow Nusa Tenggara Timur"),fill=c("orange","magenta"))
Analogi Visualisasi Prediksi Data Inflow-Outflow Uang Kartal antara Nusa Tenggara Barat dengan Nusa Tenggara Timur Setiap Bulan pada Tahun 2019.
plot(datainflow$`Nusa Tenggara Barat`,type = "l", col= "black")
lines(datainflow$`Nusa Tenggara Timur`,col="red")
lines(dataoutflow$`Nusa Tenggara Barat`, col= "orange")
lines(dataoutflow$`Nusa Tenggara Timur`,col="magenta")
legend("top",c("Inflow NTB","Inflow NTT","Outflow NTB","Outflow NTT"),fill=c("black","red","orange","magenta"))