Aqui irei carregar e importar as bases de dados e gerar o gráfico de pizza!

Abaixo está a base de dados

# Carregando arquivo 

load("C:/Users/mateu/Documents/Konoue/Estudo/Faculdade/R Project/Base_de_dados-master/Game of Thrones.RData")

Aqui está a tabela

# Carregando as tabelas

tabela_leal <- table(personagens_livro$lealdade)

Abaixo o gráfico basico

# Carregando gráfico em forma de pizza

pie(tabela_leal)

E abaixo o gráfico com cores e título

# Mudando as cores e o título

pie(tabela_leal,col =c("red","blue","green","orange","purple","pink",
                       "darkblue","gray","yellow","darkred","darkgreen","skyblue"),
    main = "Gráfico 1 - Meu primeiro gráfico")

Neste gráfico está representando a lealdade dos personagens da série Game of Thrones, onde podemos ver que que a maior parcela dos personagens está leal a Casa Ninguna, representada pela cor azul escuro, seguidos pelas Casas Guardia de la Noche, Stark e Lannister, sendo representadas respectivamentes pelas cores laranja, amarelo, roxo.

E a Casa com menos apoio é a Tyrell, representada pela cor azul claro, e vem seguidas das Casas Tully e Arryn empatadas, que tem como respectivas cores verde escuro e vermelho e a casa Martell pela cor rosa.