Criando a base de dados

load("C:/Users/vitor/Desktop/Base_de_dados-master/Game of Thrones.RData")
View(personagens_livro)

Criando as tabelas

tabelaSexo <- table(personagens_livro$sexo)
tabelaNobre <- table(personagens_livro$nobre)

Gerando os gráficos

pie(tabelaSexo, main = "Relação entre personagens femininos e masculinos", labels = c("Feminino", "Masculino"), col = c("pink","#166eba"))

Esse primeiro gráfico mostra a a relação para a quantidades de personagens femininos e masculinos em Game of Thrones. Em rosa está representado os personagens femininos e em azul os personagens masculinos.

pie(tabelaNobre,  main = "Relação entre personagens nobres e plebeus", labels = c("Nobre","Plebeu"), col = c("#e6dc25", "#0ba318"))

O segundo gráfico apresenta se os personagens de Game of Thrones são nobres ou não(plebeus). Em amarelo está representado os nobres e em verde os plebeus