notaFinal <- 0.8 * sum(notaTopicos[- which.min(notaTopicos)]) + 0.2 * notaLista