Create aula6.R