Create plot1.R

Primera versión, sólo por probar.