if (FALSE) {
# Connect to Presto
con <- DBI::dbConnect(RPresto::Presto(), ...)
# Get column types for a table
tbl(con, "my_table") %>%
presto_type()
# Get column types for a query
tbl(con, "my_table") %>%
dplyr::filter(id > 100) %>%
presto_type()
}
Run the code above in your browser using DataLab