atividade 03
Marcos Vinicius Neves Marins
25/03/2021
#Atividade 03 (FIFA)
Base de dados.
FifaData <- read.csv("C:/Users/vinny/Desktop/Base_de_dados-master/FifaData.csv")Gráfico de barras.
summary(FifaData)## Name Nationality National_Position National_Kit
## Length:17588 Length:17588 Length:17588 Min. : 1.00
## Class :character Class :character Class :character 1st Qu.: 6.00
## Mode :character Mode :character Mode :character Median :12.00
## Mean :12.22
## 3rd Qu.:18.00
## Max. :36.00
## NA's :16513
## Club Club_Position Club_Kit Club_Joining
## Length:17588 Length:17588 Min. : 1.00 Length:17588
## Class :character Class :character 1st Qu.: 9.00 Class :character
## Mode :character Mode :character Median :18.00 Mode :character
## Mean :21.29
## 3rd Qu.:27.00
## Max. :99.00
## NA's :1
## Contract_Expiry Rating Height Weight
## Min. :2017 Min. :45.00 Length:17588 Length:17588
## 1st Qu.:2017 1st Qu.:62.00 Class :character Class :character
## Median :2019 Median :66.00 Mode :character Mode :character
## Mean :2019 Mean :66.17
## 3rd Qu.:2020 3rd Qu.:71.00
## Max. :2023 Max. :94.00
## NA's :1
## Preffered_Foot Birth_Date Age Preffered_Position
## Length:17588 Length:17588 Min. :17.00 Length:17588
## Class :character Class :character 1st Qu.:22.00 Class :character
## Mode :character Mode :character Median :25.00 Mode :character
## Mean :25.46
## 3rd Qu.:29.00
## Max. :47.00
##
## Work_Rate Weak_foot Skill_Moves Ball_Control
## Length:17588 Min. :1.000 Min. :1.000 Min. : 5.00
## Class :character 1st Qu.:3.000 1st Qu.:2.000 1st Qu.:53.00
## Mode :character Median :3.000 Median :2.000 Median :63.00
## Mean :2.934 Mean :2.303 Mean :57.97
## 3rd Qu.:3.000 3rd Qu.:3.000 3rd Qu.:69.00
## Max. :5.000 Max. :5.000 Max. :95.00
##
## Dribbling Marking Sliding_Tackle Standing_Tackle Aggression
## Min. : 4.0 Min. : 3.00 Min. : 5.00 Min. : 3.00 Min. : 2.00
## 1st Qu.:47.0 1st Qu.:22.00 1st Qu.:23.00 1st Qu.:26.00 1st Qu.:44.00
## Median :60.0 Median :48.00 Median :51.00 Median :54.00 Median :59.00
## Mean :54.8 Mean :44.23 Mean :45.57 Mean :47.44 Mean :55.92
## 3rd Qu.:68.0 3rd Qu.:64.00 3rd Qu.:64.00 3rd Qu.:66.00 3rd Qu.:70.00
## Max. :97.0 Max. :92.00 Max. :95.00 Max. :92.00 Max. :96.00
##
## Reactions Attacking_Position Interceptions Vision
## Min. :29.00 Min. : 2.00 Min. : 3.00 Min. :10.00
## 1st Qu.:55.00 1st Qu.:37.00 1st Qu.:26.00 1st Qu.:43.00
## Median :62.00 Median :54.00 Median :52.00 Median :54.00
## Mean :61.77 Mean :49.59 Mean :46.79 Mean :52.71
## 3rd Qu.:68.00 3rd Qu.:64.00 3rd Qu.:64.00 3rd Qu.:64.00
## Max. :96.00 Max. :94.00 Max. :93.00 Max. :94.00
##
## Composure Crossing Short_Pass Long_Pass Acceleration
## Min. : 5.00 Min. : 6.00 Min. :10.00 Min. : 7.0 Min. :11.00
## 1st Qu.:47.00 1st Qu.:38.00 1st Qu.:52.00 1st Qu.:42.0 1st Qu.:57.00
## Median :57.00 Median :54.00 Median :62.00 Median :56.0 Median :68.00
## Mean :55.85 Mean :49.74 Mean :58.12 Mean :52.4 Mean :65.29
## 3rd Qu.:66.00 3rd Qu.:64.00 3rd Qu.:68.00 3rd Qu.:64.0 3rd Qu.:75.00
## Max. :94.00 Max. :91.00 Max. :92.00 Max. :93.0 Max. :96.00
##
## Speed Stamina Strength Balance
## Min. :11.00 Min. :10.00 Min. :20.00 Min. :10.00
## 1st Qu.:58.00 1st Qu.:57.00 1st Qu.:57.00 1st Qu.:56.00
## Median :68.00 Median :66.00 Median :66.00 Median :65.00
## Mean :65.48 Mean :63.48 Mean :65.09 Mean :64.01
## 3rd Qu.:75.00 3rd Qu.:74.00 3rd Qu.:74.00 3rd Qu.:74.00
## Max. :96.00 Max. :95.00 Max. :98.00 Max. :97.00
##
## Agility Jumping Heading Shot_Power
## Min. :11.00 Min. :15.00 Min. : 4.00 Min. : 3.00
## 1st Qu.:55.00 1st Qu.:58.00 1st Qu.:45.00 1st Qu.:45.00
## Median :65.00 Median :65.00 Median :56.00 Median :59.00
## Mean :63.21 Mean :64.92 Mean :52.39 Mean :55.58
## 3rd Qu.:74.00 3rd Qu.:73.00 3rd Qu.:65.00 3rd Qu.:69.00
## Max. :96.00 Max. :95.00 Max. :94.00 Max. :93.00
##
## Finishing Long_Shots Curve Freekick_Accuracy
## Min. : 2.00 Min. : 4.0 Min. : 6.00 Min. : 4.00
## 1st Qu.:29.00 1st Qu.:32.0 1st Qu.:34.00 1st Qu.:31.00
## Median :48.00 Median :52.0 Median :48.00 Median :42.00
## Mean :45.16 Mean :47.4 Mean :47.18 Mean :43.38
## 3rd Qu.:61.00 3rd Qu.:63.0 3rd Qu.:62.00 3rd Qu.:57.00
## Max. :95.00 Max. :91.0 Max. :92.00 Max. :93.00
##
## Penalties Volleys GK_Positioning GK_Diving
## Min. : 7.00 Min. : 3.00 Min. : 1.00 Min. : 1.00
## 1st Qu.:39.00 1st Qu.:30.00 1st Qu.: 8.00 1st Qu.: 8.00
## Median :50.00 Median :44.00 Median :11.00 Median :11.00
## Mean :49.17 Mean :43.28 Mean :16.61 Mean :16.82
## 3rd Qu.:61.00 3rd Qu.:57.00 3rd Qu.:14.00 3rd Qu.:14.00
## Max. :96.00 Max. :93.00 Max. :91.00 Max. :89.00
##
## GK_Kicking GK_Handling GK_Reflexes
## Min. : 1.00 Min. : 1.00 Min. : 1.0
## 1st Qu.: 8.00 1st Qu.: 8.00 1st Qu.: 8.0
## Median :11.00 Median :11.00 Median :11.0
## Mean :16.46 Mean :16.56 Mean :16.9
## 3rd Qu.:14.00 3rd Qu.:14.00 3rd Qu.:14.0
## Max. :95.00 Max. :91.00 Max. :90.0
## class(FifaData$Age)## [1] "integer"barplot(table(FifaData$Age), col= c("skyblue"), main="Idade dos jogadores")
Nesse Gráfico podemos perceber, que os jogadores mais contratados são os que tem entre 20 e 25 anos. Tornando-se um gráfico visivelmente assímetrico.
#Histograma
summary(FifaData$Contract_Expiry)## Min. 1st Qu. Median Mean 3rd Qu. Max. NA's
## 2017 2017 2019 2019 2020 2023 1hist(FifaData$Contract_Expiry, col= "green", main= "Contratos Expirados", xlab = "Ano/vencimento do contrato", ylab = "Frequência")
Neste histograma, observa-se também que é um gráfico assímetrico. Analisando melhor o histograma, podemos notar que o número de contratos que venceram nos anos entre 2017 e 2018, são extremamente maiores em comparação aos contratos que vencerão em 2023. Nota-se que a maioria dos contratos não são com uma data de vencimento a longo prazo.
#BOXPlot
boxplot(FifaData$Age, col= "blue", main= "Boxplot") 
Nesse Boxplot temos a idade dos jogadores contratados pela Fifa. A mediana de idade fica em torno dos 25 anos, já o terceiro quartil fica aproximadamente em 30 anos. Fica nitido a preferência de contratação por jogadores com menos idade, contudo, existem também jogadores com mais idade.