dbSendQuery
ou dbGetQuery
é apenas para a parte "SQL", não para os comandos do psql como \i
.No seu caso, o mais simples é usar
readLines
mas, em seguida, envolva dbGetQuery
em um sapply
ligar. con <- dbConnect(...) #Fill this as usual
queries <- readLines("query.sql")
sapply(queries, function(x) dbGetQuery(con,x))
dbDisconnect(con)
Como uso isso com muita frequência, tenho um atalho para isso no meu
.Rprofile
Arquivo:dbGetQueries<-function(con,queries)sapply(queries,function(x)dbGetQuery(con,x))
Claro, você também pode ir ao
system
caminho:system("psql -U username -d database -h 127.0.0.1 -p 5432 -f query.sql") #Remember to use your actual username, database, host and port