Introduction to Data Science

Tugas 1 Import, Create and Organize, Visualize


Kontak : \(\downarrow\)
Email
Instagram https://www.instagram.com/nbrigittag/
RPubs https://rpubs.com/naftalibrigitta/

1. Import Data

# setting library
library(dplyr)

# impor data
data_sakitjiwa <- read.csv("sakjiw.csv")
data_sakitjiwa


2. Create and organize subsets of tabular data using filter, select, arrange, and slice

a. Using Filter

mengfilter <- filter(data_sakitjiwa, nama_kabupaten_kota == "Kota Tangerang Selatan")
mengfilter

b. Using Select

memilih <- select(mengfilter, id, nama_kabupaten_kota, tahun, jumlah, satuan)
memilih

c. Using Arrange

menyusun <- arrange(memilih, by = desc(tahun))
menyusun

d. Using Slice

memotong <- slice(menyusun, 1:5)
memotong


3. Visualize data with a ggplot bar plot

a. Peningkatan Orang yang Mengalami Sakit Jiwa berdasarkan Tahun di kota Tangerang Selatan

# Visualisasi Data menggunakan Bar Plot
library(ggplot2)
ggplot(memotong, aes(x = tahun, y = jumlah)) +
  geom_bar(stat = "identity", 
           fill = rainbow(5), 
           color = "black") +
  theme_minimal() + 
  labs(x = "Tahun", 
       y = "Jumlah yang Sakit Jiwa (Orang)", 
       title = "Orang yang Mengalami Sakit Jiwa di Kota Tangerang Selatan")