In Snowflake, before you can submit a query you need to use a "warehouse" which is the actual engine that runs those queries.
Right after the connection is created you need to explicitly ask for any of your available warehouse:
con <- DBI::dbConnect(
drv = odbc::odbc(),
UID = user,
PWD = pass,
Server = host,
Driver = "SnowflakeDSIIDriver"
)
DBI::dbSendQuery(con, 'use warehouse YOUR_WAREHOUSE_NAME')
Another alternative (the one I use) is to set the warehouse parameter in the connection call:
con <- DBI::dbConnect(
drv = odbc::odbc(),
UID = user,
PWD = pass,
Server = host,
Warehouse = 'YOUR_WAREHOUSE_NAME',
Driver = "SnowflakeDSIIDriver"
)