Aqui vou carregar a minha base de dados
# Carregar as bases de dados
load("C:/Users/luuan/Desktop/UNIRIO/estatistica/Base_de_dados-master/df_pokemon.RData")
load("C:/Users/luuan/Desktop/UNIRIO/estatistica/Base_de_dados-master/CARROS.RData")# Estatísticas da média da mediana, 1 quartil, e 3 quartil
summary(df$attack) Min. 1st Qu. Median Mean 3rd Qu. Max.
5.00 53.00 73.00 74.85 95.00 165.00
summary(df$defense) Min. 1st Qu. Median Mean 3rd Qu. Max.
5.00 50.00 65.00 70.67 85.00 230.00
summary(df$base_experience) Min. 1st Qu. Median Mean 3rd Qu. Max.
36.00 65.25 147.00 141.55 177.00 608.00
# BOXPLOT
boxplot(df$attack, col = "skyblue",
main = "Gráfico 1 - boxplot do ataque do pokemon")boxplot(df$height, col = "tomato",
main = "Gráfico 2 - boxplot da altura do pokemon")boxplot(df$base_experience, col = "yellow",
main= "Gráfico 3 - boxplot da experiência do pokemon")