Skip to content

Instantly share code, notes, and snippets.

View viciana's full-sized avatar

Francisco Viciana viciana

  • Instituto de Estadística y Cartografia de Andalucía
  • Sevilla
View GitHub Profile
@viciana
viciana / LeerCubo226SecciCensal.R
Last active February 20, 2017 15:53
Lectura de cubo OLAP 226 de la publicacion: Estadísticas Longitudinales de Supervivencia y Longevidad en Andalucía
# Descarga y preparación de los datos del cubo OLAP en formato pcAxis,
# cuyo enlace se encuentra en la parte inferior izquierda de las paginas
# de tabulaciones de: "Estadísticas Longitudinales de Supervivencia y Longevidad en Andalucía"
# http://www.juntadeandalucia.es/institutodeestadisticaycartografia/consultasActividad.jsp?CodOper=660&sub=50517
# install.packages('pxR')
require(pxR) # activar paquete de lectura de ficheros px-Axis
if (! dir.exists('datos') ) dir.create('datos')
download.file('http://www.juntadeandalucia.es/institutodeestadisticaycartografia/longevidad/pcaxis/consulta226.zip', destfile = 'datos/consulta226.zip')
unzip('datos/consulta226.zip', list = T) # Lista nombre de fichero
@viciana
viciana / LeeSHPFileSeccCen2001.R
Created February 20, 2017 15:48
Descarga, lectura y representación de las secciones censales del censo de 2001. Andalucía
library(rgdal)
require(ggmap)
rm(list = ls())
## Descarga las secciones censales del censo de 2001, previa preparacion
## De la pagina:
## 'http://www.juntadeandalucia.es/institutodeestadisticaycartografia/clientedescarga/
## Hay que seleccionar manualmente la capa : "Secciones Censales noviembre de de 2001 (censo)" y
## y marcar "extensión completa" esperar unos minutos, que se genere la petición y descargarla.
## O mejor copiar el nombre del fichero ZIP (con shapefiles) y modificar las dos linead dabajo de esta
@viciana
viciana / DatosClimaAndalucia.R
Created April 4, 2017 16:30
Ejemplo de descarga de datos climaticos
# require(devtools)
# install_github('SevillaR/Andaclima')
require(Andaclima)
rm(list = ls())
stations <- getAndalusia_ACS()
metainfo <- getMetaData(provincia = stations$province.code,
estacion = stations$station.code ,
@viciana
viciana / LeerCohorteCensal2001And.R
Last active November 13, 2019 18:33
Script de importanción en in objeto R de los ficheros de microdatos de la publicación "Estadísticas Longitudinales de Supervivencia y Longevidad en Andalucía, 2002-2013"
## ==========================================================
## Procesar: Fichero censal
## ==========================================================
# instalar 'memisc' si fuera necesario
if(!require(readr)){ install.packages("readr") ; require(readr)}
if(!require(memisc)){ install.packages("memisc") ; require(memisc)}
rm(list = ls())
##--------------------------------------------------------------------------
* Intrucciones de impotación SPSS para los fichero de microdatos, de texto plano, con Biografias Reproductivas de la cohorte censal andaluza de 2001
* de la publicacion: https://www.juntadeandalucia.es/institutodeestadisticaycartografia/fecundidad/index.htm
* Datos: https://www.juntadeandalucia.es/institutodeestadisticaycartografia/descarga/fecundidad/andalucia/datosandalucia.zip
DATA LIST FILE="~/ma.txt" /
viv 1-6
idv 7-8
relREF 9-9
fNac 10-14
sexo 15-15
annoe 16-16
* Lectura del fichero texto plano.
DATA LIST FILE="./ma.txt" /
viv 1-6
idv 7-8
felev 9-17
provincia 18-19
fnac 20-24
sexo 25-25
lugNac 26-26
anye 27-27
@viciana
viciana / diff_LEx_CCAA.R
Created March 12, 2024 09:22
Descomposición de las diferencias en "Life Expectancy" entre dos poblaciones. Usa las tabla de vida oficiales del INE como entrada ..
## ----------------------------------------------------------------------------
## Descomposición de las diferencias en "Life Expectancy" entre dos poblaciones
## Usa las tabla de vida oficiales del INE como entrada ..
## ----------------------------------------------------------------------------
rm(list = ls())
require(pxR)
require(data.table)
require(ggplot2)