## Warning: package 'dplyr' was built under R version 3.5.1
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
##
## Attaching package: 'ggplot2'
## The following objects are masked from 'package:psych':
##
## %+%, alpha
## Warning: package 'sjPlot' was built under R version 3.5.1
enem_2015 %>% select(contains("NU_NOTA")) %>%
sjp.corr(wrap.labels = 12, axis.labels = names(.))+
theme(axis.title.x = element_text(face="bold", colour="#990000", size=10),
axis.text.x = element_text(angle=90, vjust=0.5, size=6))+
theme(axis.title.y = element_text(face="bold", colour="#990000", size=10),
axis.text.y = element_text(angle=0, vjust=0.5, size=6))
## Computing correlation using pearson-method with listwise-deletion...
## Warning: Removed 66 rows containing missing values (geom_text).
