my.px     <- read.px(system.file("extdata", "example.px", package = "pxR"))
my.array  <- as.array(my.px)
my.array2  <- as.array(my.px ,use.codes=TRUE)
my.array3  <- as.array(my.px ,use.codes=c('municipios'))
Run the code above in your browser using DataLab