Mejoras en mapa y script de R.