Create script.R

Carga Inicial del script