parlgov.R

library(RSQLite)

sqlite  <- dbDriver("SQLite")

# Stahni SQLite DB z webu, pokud neexistuje
if(!file.exists("parlgov-development.db")){
    download.file("http://www.parlgov.org/static/data/parlgov-development.db", 
                  dest = "parlgov-development.db")
}

# pripoj se k DB
con <- dbConnect(sqlite, "parlgov-development.db")

# seznam tabulek
dbListTables(con)

# TODO: práce se DB

# odpojit se od DB
dbDisconnect(con)