#Latihan VDE W9
#latihan titanic
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.4.3
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.4.3
#import dataset
titanic = read.csv("C:/Users/KOKO MEME/Downloads/titanic2.csv.csv")
#Contoh Visualisasi
#1. perbandingan jenis kelamin di titanic
ggplot(titanic,aes(x=Sex))+
geom_bar(fill="pink")+
labs(title = "Perbandingan jenis kelamin Penumpang Titanic")