#file = "/home/wagner/Dropbox/Cursos/EstatísticaBásica/BiologiaMANHA/Prova1NOTA.csv"
#prova1 <- read.csv(file, header = TRUE)
#kable(prova1, align = c("l","c","c","c","c","c","c","c","c","c","c","c","l"), digits = 2)