Microdados com R - Parte 6

gistfile1.r

# ----------------------------------------------
# read.SAScii.sqlite() criada por  Anthony Joseph Damico
# verificar se o dicionário esta sendo importado de maneira correta
parse.SAScii('2011_PES_input.sas')
# carregar a função read.SAScii.sqlite()
source('read.SAScii.sqlite.R')
# é possível baixar a função via:
#source_url( "https://raw.github.com/ajdamico/usgsd/master/SQLite/read.SAScii.sqlite.R" )
drv <- dbDriver("SQLite")
con <- dbConnect(drv, dbname='pnad')
# verificar as tabelas da base de dados pnad
dbListTables(con)
# transformar um arquivo do IBGE direto em uma base SQLite
read.SAScii.sqlite(fn = "2011_PES.TXT", sas_ri = "2011_PES_input.sas", tl = TRUE, tablename = "pes2011", db = con)
# verificar as tabelas da base de dados pnad
dbListTables(con)
## Quando utilizar a função read.SAScii.sqlite() é importante não carregar a função fwf2csv() elaborada por Marcos f Silva, pois, ela gera conflito com a função fwf2csv() do pacote 'descr', que é utilizada via read.SAScii.sqlite()
# ----------------------------------------------