Primeiro vamos carregar a base!

load("C:/Users/jcastra6/Desktop/estatistica/Base_de_dados-master/Game of Thrones.RData")

Depois vamos gerar nossa tabela!

tabela_game <- table(personagens_livro$lealdade)

tabela_game
## 
##               Arryn           Baratheon             Greyjoy Guardia de la Noche 
##                  30                  64                  75                 116 
##           Lannister             Martell             Ninguna            Salvajes 
##                 102                  37                 253                  40 
##               Stark           Targaryen               Tully              Tyrell 
##                 108                  36                  30                  26

E por último, nosso gráfico de pizza!

pie(tabela_game, col =c("darkblue", "tomato2", "black", "purple", "yellow", "#7ccff2", "#a6ffe0", "#ff8800", "#f70ab0", "#9430ff", "#4cff30", "white"))

Primeiro podemos observar que este é um modelo de gráfico bem básico e que traz com ele pouquíssimas observações a serem feitas. A primeira delas e destacada pelo verde água é que grande parte dos personagens não tem lealdade a nenhuma casa, pois não fazem parte das famílias dominantes e nem de seus “servos”. As casas que dividem as primeira posições (embora o gráfico não mostre exatamente os números) são Lannister (deve ser porque eles sempre pagam suas dívidas) e os Starks, acredito que por serem coerentes, determinados e terem um grande senso de justiça! Quem também possui grande lealdade dos personagens é a Guarda da noite (Guardia de la noche) uma organização bem antiga e que protege a muralha. Podemos observar também que os nada confiáveis, Greyjoy, divivem a segunda posição com os Baratheon(quem?kkk) todo mundo só adora aquele castelo lindo de dragão, porém os herdeiros dessa casa são bem invisíveis. Pode-se notar também os 3 pequeninos compostos pelos esquisitos Arryn do ninho da águia, que vieram dos Tully que também estão nesse meio, e os cheirosos Tyrel do Jardim de cima. Os Targaryen embora um pouco maiores e muito mas muito loucos, também não fazem expressão.