library(MonetDB.R) 

#criando um banco de dados

startscript <- monetdb.server.setup(  

                                    database.directory = paste0( getwd() , "/MonetDB" ) ,

                                    "", 

                                    dbname = "db1", 

                                    dbport = 50002 

                                    )

pid <- monetdb.server.start(startscript) 

conn <- dbConnect(MonetDB.R(), "monetdb://localhost:50002/db1")

# 224 colunas

# 4038218 linhas

# arquivo com 2.2 GB

# 109.149 segundos

system.time({

    monetdb.read.csv(conn, 'censo00sp1.csv', "censo00sp", 4038218)

})