Create codigo.R