Dados

Utilizamos a tabela Titanic.RData para as informações abaixo.

load("C:/Users/info/Desktop/Base_de_dados-master/Titanic.RData")

Distribuição de Classes no Titanic

O Titanic era dividido em 3 classes hierarquicas, além da tripulação. Observa-se nos graficos abaixo que a Terceira Classe era a que tinha mais tripulantes, entendido pelo fato da quantidade de pessoas por dormitório permitido, diferente das classes superiores. Além disso, nota-se grande quantidade de tripulantes também no navio:

table(Titanic$Classe)
## 
## Tripulação   Primeira    Segunda   Terceira 
##        885        324        285        706
Classe <- table(Titanic$Classe)

pie(Classe, col = c("darkred", "darkgreen", "skyblue", "yellow", main = "Viajantes por Classe no Titanic"))

barplot((Classe), col = c("darkred", "darkgreen", "skyblue", "yellow"), main = "Viajantes por Classe no Titanic", ylim = c(0,1000))