guerra dos tronos

summary(mudancas_aliancas$episodios)

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  1.000   1.000   2.000   6.043   6.000  61.000 

summary(personagens_livro$Guerra_dos_Tronos)

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
 0.0000  0.0000  0.0000  0.2726  1.0000  1.0000 

summary(tempo_de_tela$minutos)

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  1.150   4.375  10.300  27.261  27.650 293.300 

boxplot(mudancas_aliancas$episodios,col = "skyblue",
        main="Grafico 1 - boxplot do mudanças_aliança")

boxplot(personagens_livro$Guerra_dos_Tronos,col = "tomato2",
        main="Grafico 2 - boxplot do personagens_livro")

boxplot(tempo_de_tela$minutos,col = "yellow",
        main="Grafico 3 - boxplot do tempo_de_tela")

library(dplyr)

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

personagens_livro$nobre <- ifelse(personagens_livro$nobre==1,"nobre","não nobre")
table(personagens_livro$sexo,personagens_livro$nobre)

           
            não nobre nobre
  femenino         73    84
  masculino       414   346

tabela_da_nobreza <- table(personagens_livro$sexo,personagens_livro$nobre)
tabela_da_nobreza

           
            não nobre nobre
  femenino         73    84
  masculino       414   346

prop.table(tabela_da_nobreza,2)

           
            não nobre     nobre
  femenino  0.1498973 0.1953488
  masculino 0.8501027 0.8046512

barplot(tabela_da_nobreza,legend=TRUE)

barplot(tabela_da_nobreza,legend=TRUE,beside=TRUE,col = c("red","blue"))

Ao utilizar o camando summary, eu pude ver a média maxima e a média minima do arquivo, sendo este arquivo “guerra dos tronos”, que nele nós vamos ter as subdivisões “mudança_alianças”, “personagem_livro” e “tempo_tela”. Logo em seguida por meio do comando boxplot foi possivel fazer uma comparação dos gráficos que foram apresentados.

Com o tratamento de dados foi possivel fazer alterações no banco de dados e assim deixa-lo com uma nomeclatura mais condizente com o trabalho proposto, sendo assim ajudando na realização e identificação dos dados.

Ao começar a leitura do grafico, podemos perceber que a incidencia de homens fora da nobreza é maior do que na nobreza, enquanto no caso das mulheres, nós podemos observar o inverso, tendo assim uma tendecia maior das mulheres estarem presentes na nobreza. Podemos identificar através da diferenciação das cores colocadas no gráfico, assim facilitando a interpretação dele.