Create codigo.R

creacion