Create aula23.R