Visualisasi Data Wisata Kota Bandung
Package yang digunakan untuk dashboard
library(flexdashboard)
library(shiny)
library(shinydashboard)Dashboard merupakan salah satu perangkat visualisasi yang dapat digunakan untuk manayangkan ringkasan data, analisa,atau indikator tertentu. Penyusunan dashboard menggunakan R software dapat dilakukan dengan beberapa cara, di antaranya adalah dengan menggunakan:
flexdashboard Package flexdashboard memungkinkan kita menyusun dashboard menggunakan file berbasis R markdown. Berikut adalah langkah-langkahnya. Pertama, kita perlu install terlebih dulu package flexdashboard tersebut. (Contoh: file flexdashboard.Rmd)
R shiny Struktur R shiny terdiri dari tiga komponen utama, yaitu:
- user interface (UI), ini merupakan bagian dimana kita bisa mengatur tampilan dari app yang kita bangun.
- server, ini merupakan bagian untuk menjalankan fungsi-fungsi yang ada di dalam app.
- shinyApp, ini merupakan bagian yang menghubungkan antara UI dengan server.
R Shiny, biasa digunakan untuk membangun aplikasi web.
- R shinydashboard Package shinydashboard dapat digunakan untuk menyusun dashboard menggunakan R shiny.
Data
Data yang digunakan adalah data kunjungan wisata 2021 yang bersumber dari kaggle. Data dapat didownload pada link draf pembelajaran https://ipb.link/praktikum-visualisasidata. (Nama file: Wisata Bandung)
Keterangan:
tourism_with_id.csv - mengandung informasi tempak wisata di 5 kota besar di Indonesia (hanya kota Bandung yang dipakai)
user.csv - mengandung informasi pengguna untuk membuat rekomendasi fitur berdasar pengguna
tourism_rating.csv - mengandung informasi pengguna, tempat wisata, dan rating untuk membuat sistem rekomendasi berdasar rating
library(plotly)
library(dplyr)setwd("C:/Users/LENOVO/Downloads/Wisata Bandung")
rating <- read.csv("tourism_rating.csv")
place<- read.csv("tourism_with_id.csv")
user<- read.csv("user.csv")head(place)## Place_Id Place_Name
## 1 1 Monumen Nasional
## 2 2 Kota Tua
## 3 3 Dunia Fantasi
## 4 4 Taman Mini Indonesia Indah (TMII)
## 5 5 Atlantis Water Adventure
## 6 6 Taman Impian Jaya Ancol
## Description
## 1 Monumen Nasional atau yang populer disingkat dengan Monas atau Tugu Monas adalah monumen peringatan setinggi 132 meter (433 kaki) yang didirikan untuk mengenang perlawanan dan perjuangan rakyat Indonesia untuk merebut kemerdekaan dari pemerintahan kolonial Hindia Belanda. Pembangunan monumen ini dimulai pada tanggal 17 Agustus 1961 di bawah perintah presiden Soekarno dan dibuka untuk umum pada tanggal 12 Juli 1975. Tugu ini dimahkotai lidah api yang dilapisi lembaran emas yang melambangkan semangat perjuangan yang menyala-nyala. Monumen Nasional terletak tepat di tengah Lapangan Medan Merdeka, Jakarta Pusat.
## 2 Kota tua di Jakarta, yang juga bernama Kota Tua, berpusat di Alun-Alun Fatahillah, yaitu alun-alun yang ramai dengan pertunjukan rutin tarian tradisional. Museum Sejarah Jakarta adalah bangunan era Belanda dengan lukisan dan barang antik, sedangkan Museum Wayang memamerkan boneka kayu khas Jawa. Desa Glodok, atau Chinatown, terkenal dengan makanan kaki lima, seperti pangsit dan mi goreng. Di dekatnya, terdapat sekunar dan kapal penangkap ikan di pelabuhan Sunda Kelapa yang kuno
## 3 Dunia Fantasi atau disebut juga Dufan adalah tempat hiburan yang terletak di kawasan Taman Impian Jaya Ancol, Jakarta Utara, Indonesia. Dufan diresmikan dan dibuka pada tanggal 29 Agustus 1985.
## 4 Taman Mini Indonesia Indah merupakan suatu kawasan taman wisata bertema budaya Indonesia di Jakarta Timur. Area seluas kurang lebih 150 hektare atau 1,5 kilometer persegi ini terletak pada koordinat 6°18â\200²6.8â\200³LS,106°53â\200²47.2â\200³BT
## 5 Atlantis Water Adventure atau dikenal dengan Atlantis Ancol akan menyuguhkan petualangan wisata air tak terlupakan. Tempat Wisata bertemakan permainan air dengan luas 5 hektar ini memberi sensasi petualangan di 8 kolam utama. Yaitu kolam Antila, Plaza Atlas, Poseidon, Aquarius, Octopus, Kiddy Pool, dan Atlantean. Berlokasi di kawasan Ancol Jakarta Baycity, Atlantis bisa menjadi pilihan destinasi yang pas untuk wisata berenang.
## 6 Taman Impian Jaya Ancol merupakan sebuah objek wisata di Jakarta Utara.\\n\\n
## Category City Price Rating Time_Minutes
## 1 Budaya Jakarta 20000 4.6 15
## 2 Budaya Jakarta 0 4.6 90
## 3 Taman Hiburan Jakarta 270000 4.6 360
## 4 Taman Hiburan Jakarta 10000 4.5 NA
## 5 Taman Hiburan Jakarta 94000 4.5 60
## 6 Taman Hiburan Jakarta 25000 4.5 10
## Coordinate Lat Long X X.1
## 1 {'lat': -6.1753924, 'lng': 106.8271528} -6.175392 106.8272 NA 1
## 2 {'lat': -6.137644799999999, 'lng': 106.8171245} -6.137645 106.8171 NA 2
## 3 {'lat': -6.125312399999999, 'lng': 106.8335377} -6.125312 106.8335 NA 3
## 4 {'lat': -6.302445899999999, 'lng': 106.8951559} -6.302446 106.8952 NA 4
## 5 {'lat': -6.12419, 'lng': 106.839134} -6.124190 106.8391 NA 5
## 6 {'lat': -6.117333200000001, 'lng': 106.8579951} -6.117333 106.8580 NA 6Eksplorasi Data
Melihat data pengunjung Bandung
Bandung <- place %>%
select(Place_Id, Place_Name, Category, City, Price, Rating) %>%
filter(City=="Bandung")
head(Bandung)## Place_Id Place_Name Category City Price Rating
## 1 211 GunungTangkuban perahu Cagar Alam Bandung 30000 4.5
## 2 212 Jalan Braga Budaya Bandung 0 4.7
## 3 213 Gedung Sate Budaya Bandung 5000 4.6
## 4 214 Trans Studio Bandung Taman Hiburan Bandung 280000 4.5
## 5 215 Taman Hutan Raya Ir. H. Djuanda Cagar Alam Bandung 15000 4.5
## 6 216 Farm House Susu Lembang Taman Hiburan Bandung 30000 4.4Melihat data user yang pernah memberi rating wisata Kota Bandung
Bandung_rate <- place %>%
select(Place_Name, Rating, City) %>%
filter(City=="Bandung")
head(Bandung)## Place_Id Place_Name Category City Price Rating
## 1 211 GunungTangkuban perahu Cagar Alam Bandung 30000 4.5
## 2 212 Jalan Braga Budaya Bandung 0 4.7
## 3 213 Gedung Sate Budaya Bandung 5000 4.6
## 4 214 Trans Studio Bandung Taman Hiburan Bandung 280000 4.5
## 5 215 Taman Hutan Raya Ir. H. Djuanda Cagar Alam Bandung 15000 4.5
## 6 216 Farm House Susu Lembang Taman Hiburan Bandung 30000 4.4Melihat data user yang pernah mengunjungi Bandung
head(user)## User_Id City Provinces Age
## 1 1 Semarang Jawa Tengah 20
## 2 2 Bekasi Jawa Barat 21
## 3 3 Cirebon Jawa Barat 23
## 4 4 Bekasi Jawa Barat 21
## 5 5 Lampung Sumatera Selatan 20
## 6 6 Jakarta Utara DKI Jakarta 18Pengunjung <- user %>%
select(User_Id, City, Age) %>%
filter(City == "Bandung")
head(Pengunjung)## User_Id City Age
## 1 8 Bandung 40
## 2 64 Bandung 38
## 3 81 Bandung 29
## 4 137 Bandung 28
## 5 154 Bandung 31
## 6 205 Bandung 24Visualisasi Data
Kategori Tempat Wisata dengan Rating Terbanyak di Kota Bandung
top_5 <- Bandung %>%
group_by(Category) %>%
summarise(Rating_count = n()) %>%
ggplot()+
geom_col(aes(Rating_count, Category, fill=Category))+
ggtitle("Kategori Tempat Wisata dengan Rating Terbanyak") +
xlab("Jumlah Rating") +
ylab("") +
theme(plot.title = element_text(hjust = 0.5))+
theme_classic()
top_5
Visualisasi Usia Pengunjung
Pengunjung %>%
ggplot()+
geom_boxplot(aes(x=User_Id, y=Age, fill="Pengunjung"))+
ggtitle("Distribusi Usia Pengunjung Wisata Kota Bandung") +
xlab("Umur") +
ylab("") +
theme(plot.title = element_text(hjust = 0.5))+
theme_classic()
Melihat Distribusi Harga Masuk Wisata Kota Bandung
Harga <- Bandung %>%
ggplot()+
geom_boxplot(aes(Category, Price, fill=Category))+
ggtitle("Kategori Tempat Wisata dengan Rating Terbanyak") +
xlab("Harga") +
ylab("") +
theme(plot.title = element_text(hjust = 0.5))+
theme_classic()
Harga